Дана программа на языке Паскаль:
program a4;
var x, k1, k2: integer;
begin
k1:=0
k2:=0
writeln ( Введите три числа);
readln (x);
if x<0 then k1:=k1+1;
if x<0 then k2:=k2+1;
intil x=0;
writeln (k1=,k1,,k2=,k2)
end
Составьте блок-схему, соответствующую программе.
Что является результатом работы программы?
у тебя программа неправильная. Не до конца понял, почему у тебя с какого-то бока стоит там какой-то intil x=0, если у тебя цикл, то должен был быть repeat сначала, потом уже Until.
проверь программу, паскаль ответ тебе не выдаст.
а блок-схема вот.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
