Регистрация
3eбpa
20.10.2020 15:57
Информатика
Есть ответ 👍

Написать программу для определения суммы натуральных чисел от 1 до n (n- вводится с клавиатуры)

246
440
Посмотреть ответы 2

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

skiba04
skiba04
4,7(6 оценок)
Program z1; var a,i,n,sum: integer; begin sum: =0 read(n); for i: =1 to n begin read(a); sum: =sum+a; end; writeln(sum); end.
KittyKittyk
KittyKittyk
4,4(69 оценок)
Var   points: integer; begin   write('введите количество -> ');   readln(points);   if (points < 60) then     writeln('оценка 2.')   else if (points > = 60) and (points < 80) then     writeln('оценка 3.')   else if (points > = 80) and (points < 90) then     writeln('оценка 4.')   else if (points > = 90) then     writeln('оценка 5.') end.

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