4. Составить Паскаль-программу для вычисления и печати значения переменной S, равного сумме квадратов нечетных чисел от 1 до 19 включительно.
4. Составить Паскаль-программу для вычисления и печати значения переменной S, равного сумме квадратов нечетных чисел от 1 до 19 включительно.
Гость
Ответ(ы) на вопрос:
Гостьprogram znanija_12709446;
var i : integer;
s : integer;
begin
for i := 1 to 19 do
if (i mod 2 <> 0) then
s := s + i*i;
print(s);
end.
Не нашли ответ?
Похожие вопросы