Регистрация
0rus0
04.12.2021 03:48
Информатика
Есть ответ 👍

Составить блок схемы.

105
359
Посмотреть ответы 1

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

lidafilinp016fh
lidafilinp016fh
4,7(70 оценок)
Program gt; var n: integer; function chik(n: integer): integer; var s,q: integer; begin s: =0; while n> 0 do begin q: =n mod 10; n: =n div 10; s: =s+q; end; chik: =s; end; begin read(n); if(chik(n) mod 2=0)then writeln('yes')else writeln('no'); end.2)program gt; var n,q,k,r: integer; beginread(n); k: =0; r: =-1; while n> 0 dobeginq: =n mod 10; n: =n div 10; if(q> =r)and(r< > -1)then k: =1; r: =q; end; if(k=0)then writeln('yes')else writeln('no'); end.

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