Как реализовать в паскаль? Дано натуральное n > 0. Найти произведение первых n простых чисел.
Подсказка: используйте булевскую функцию для проверки,
является число простым числом или нет.

Текстовый
Алфавитно-цифровые данные (до 255 символов)
Mеmо
Алфавитно-цифровые данные - предложения, абзацы, тексты ( до 64 000 символов)
Числовой
Различные числовые данные (имеет несколько форматов: целое, длинное целое, с плавающей точкой)
Дата\Время
Дата или время в одном из предлагаемых Access форматов
Денежный
Денежные суммы, хранящиеся с 8 знаками в десятичной части. В целой части каждые три разряда разделяются запятой.
Счетчик
Уникальное длинное целое, создаваемое Access для каждой новой записи
Логический
Логические данные, имеющие значения Истина или Ложь
Объект OLE
Картинки, диаграммы и другие объекты OLE из приложений Windows
Гиперссылка
В полях этого типа хранятся гиперссылки, которые представляют собой путь к файлу на жестком диске, либо адрес в сетях Inernet или Intranet.

import java.util.*;
import java.lang.*;

class {
public static void main(String[] args){

Scanner sc = new Scanner(System.in); // то для ввода

int ecoPrice = 0;
int businesPrice = 2 * ecoPrice;
int placeeco;
int placeBus;

System.out.print("Enter scolyco ostalos eco mest): ");
placeeco = 120 - sc.nextInt();
System.out.print("enter ecoprice: ");
ecoPrice = sc.nextInt();
System.out.print("Enter scolyco ostalos bus mest): ");
placeBus = 40 - sc.nextInt();
System.out.print("enter busprice");
businesPrice = sc.nextInt();

int plus = placeeco * ecoPrice + businesPrice * placeBus;
System.out.print("Dohod: " + plus);
}
}

поставь лучший ответ