Информатика, опубликовано 2018-08-22 22:12:10 by Гость
СРОЧНО! Pascal!! 18 баллов! Составьте программу, используя цикл while do. Найти сумму чисел 2,4,6,8...20.
Ответ оставил Гость
Program pr;
uses crt;
Var sum,i:integer;
Begin
i:=2;
sum:=0;
While i Begin
sum:=sum+i;
i:=i+2;
end;
Writeln(sum = , sum);
readln();
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.