написать програму которая проверяет является ли целое число введенное пользователем- простым. ЭТО ТУРБО ПАСКАЛЬ, ЦИКЛ FOR<ПЛИЗ ОЧЕНЬ НААДО*))))

program qq;
var a,b:integer; 
begin

readln (b);

for a:=b div 10 then write("простое");
end;
иначе write ("не простое");

end;

write(а);

end.
я не уверен, что программа будет работать правильно(

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку