Дана программа на языке паскаль: 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 составьте блок-схему, соответствующую программе. что является результатом работы программы?
256
475
Ответы на вопрос:
begin
k1: =0
k2: =0
writeln (' введите три числа');
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.
проверь программу, паскаль ответ тебе не выдаст.
а блок-схема вот.
Популярно: Информатика
-
sv508029.06.2020 03:03
-
13Андрей131119.06.2020 12:09
-
асем19856630.10.2020 17:09
-
azalhanovahalid27.05.2020 22:10
-
DOTA2олежа25.02.2020 10:18
-
marinabelousov213.01.2021 03:58
-
MiyaGi12315.01.2021 01:01
-
gfyyfyftd19.12.2021 16:51
-
Паралиллепипед14.01.2023 09:21
-
ева47008.07.2020 00:20