8класс
Часть 2 страница 71 номер 196, ГДЗ по информатике за 8 класс к рабочей тетради Босовой бесплатно
Номер 196. Дана программа на языке Паскаль:
program a4;
var x, k1, k2: integer;
begin
k1:=0;
k2:=0;
repeat
writeln ('Введите целое число');
readln (x);
if x<0 then k1:=k1+1;
if x>0 then k2:=k2+1;
until x=0;
writeln ('k1=', k1, ' ', 'k2=', k2)
end.
Составьте блок-схему, соответствующую программе.
Чем являются результаты работы программы?
program a4;
var x, k1, k2: integer;
begin
k1:=0;
k2:=0;
repeat
writeln ('Введите целое число');
readln (x);
if x<0 then k1:=k1+1;
if x>0 then k2:=k2+1;
until x=0;
writeln ('k1=', k1, ' ', 'k2=', k2)
end.
Составьте блок-схему, соответствующую программе.
Чем являются результаты работы программы?
