Переведите с паскаля на кумир! var a, s: integer; - вопрос №97235860 от мартина 04.11.2020 02:01

Question

Информатика: Переведите с паскаля на кумир! var a, s: integer; begin s : = 0; read (a); while a 0 do begin s : = s + 1; read(a); end; writeln(s); end.

мартина · Answer

алгнач цел a, s s:=0 ввод a нц пока a 0  s:=s+1  ввод(a) кц вывод(s)конЕсли будут ошибки отписаться...

Переведите с паскаля на кумир! var a, s: integer; begin s : = 0; read (a); while a < > 0 do begin s : = s + 1; read(a); end; writeln(s); end.