profile
Опубликовано 4 года назад по предмету Информатика от Аккаунт удален

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

  1. Ответ
    Ответ дан VISANTIA

    program qq;
    var a,b:integer; 
    begin

    readln (b);

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

    end;

    write(а);

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

  2. Ответ
    Ответ дан PsyhoAssasin

    Program SimpleNumber; 

    Uses Crt; 

    var i,f,n:integer;
    begin
        write('Введите число:');
         readln(n);
         for i:=2 to trunc(sqrt(n)) do
    if (n mod i)=0 then f:=1;
    if (f=0) then write('Число Простое')

               else writeln('Число не является простым');
       readkey;
    end.

Самые новые вопросы
Носкова Анастасия
Другие предметы - 3 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Наумова Надя
Другие предметы - 3 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

Сазонова Анастасия
История - 3 года назад

Кто такой мильтиад и какова его роль в победе над персами?

Тетерина Татьяна
История - 3 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

Попова Полина
География - 3 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.