ответ:
в зависимости от начинки(процесор, плата, видеокарта и т.д)
procedure recursiveprime(num:integer);
var
i:integer;
begin
{тупая проверка *числа* на простоту - пытаемся поделить на все числа от 2 до *числа*/2)
i:=2;
while i<(num div 2) and (num mod i <> 0) do inc(i)
if i=num div 2 then println(num,"- простое!');
if num<60 then recursiveprime(num+1);
end;
begin
recursiveprime(4);
end.
Объяснение:
ну как-то так.. паскаля под рукой нет, лет 7 назад последний раз трогал дельфи
рекурсивная процедура которая вызывает саму себя со следующим числом если переданое ему число меньше 60
проверка на простоту - пытаемся поделить на все числа от 2 до половины проверяемого числа и проверяем остатки.
надеюсь мысль понятна
Поделитесь своими знаниями, ответьте на вопрос:
Хелп почему у компьютеров разные стоимости?
ответ:
у кокого то компьютера больше памяти, у коео го то меньше. у кокого то компьютера мощность больше, у некоторых только для работы
объяснение: