От программы записанной на алгоритмическом языке, перейдите к записи программы Паскаль. Определите,что будет напечатано в результате работы программы, если были введены следующие числа: 1; 5; -10; 3; -8; 6; 4; 0. Алгоритм. язык...
От программы записанной на алгоритмическом языке, перейдите к записи программы Паскаль. Определите,что будет напечатано в результате работы программы, если были введены следующие числа: 1; 5; -10; 3; -8; 6; 4; 0. Алгоритм. язык алг. цел s,x нач s:=0 нц ввод х s:=s+x кц при х=0; Вывод s кон
Ответ(ы) на вопрос:
var
s,x:integer;
begin
s:=0;
repeat
Read(x);
s:=s+x;
until x=0;
Writeln(s); end. Будет выведено 1
Не нашли ответ?
Похожие вопросы