Составить программу паскаль для вычисления суммы нечетных чисел…

Question

Составить программу паскаль для вычисления суммы нечетных чисел от 1 до заданного пользователем числа n. Спасибо)

Answer 1

92

dmidon

26 февраля 2023

Program Summa; var s,i,n: integer; begin write ('Введите n: '); readln (n); s: =0; for i: =1 to n do if (i mod 2) <>0 then s: =s+i; writeln; writeln ('Сумма нечетных чисел равна: ',s); readln; {для паузы}end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: