Регистрация
M8ilen
27.11.2020 17:25
Информатика
Есть ответ 👍

Напишите программы в паскале: 1) цикл с предусловием. написать программу, вычисления у=х2 при х=2, 4, 6, 8, 10; 2) цикл с постусловием. написать программу, в которой требуется вводить с клавиатуры числа и подсчитывать их сумму, до первого введенного отрицательного числа; 3) цикл параметром. написать программу, которая находит сумму чисел от 1 до 20

117
278
Посмотреть ответы 2

Ответы на вопрос:

К1а2т3я456
К1а2т3я456
4,7(6 оценок)
Program n1; var y, x: integer; begin x: =0; while x< 10 do begin x: =x+2; y: =x*x; writeln(y); end; end. program n2; var x, sum: real; begin sum: =0; repeat readln(x); if(x> =0) then sum: =sum+x; until x< 0; writeln(sum); end. program n3; var a, i: integer; begin a: =0; for i: =1 to 20 do a: =a+i; writeln(a); end.
Mesia14
Mesia14
4,6(89 оценок)
Одно и тоже токо названия разные

Популярно: Информатика