Регистрация
kkkkkddd
25.03.2021 15:32
Информатика
Есть ответ 👍

Вмассиве увеличить отрицательное в 2 , а суммированного на 3 блок-схема!

177
215
Посмотреть ответы 1

Ответы на вопрос:

Mashannjjj
Mashannjjj
4,6(56 оценок)
Pascalabc.net 3.3.5, сборка 1650 от 01.04.2018 внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   if n< 4 then writeln('yes')   else begin       var found: =(n mod 2=0);       var p: =3;       while (not found) and (sqr(p)< =n) do           begin found: =(n mod p=0); p+=2 end;       if found then writeln('no')       else writeln('yes')       end end. примеры n= 63 no n= 43 yes

Популярно: Информатика