Паскаль.

Найти сумму корней квадратных из всех нечетных двузначных чисел

Question

Мишука

29 июля, 18:22

+4

Ответы (1)

Знаете ответ?

Фетиния · Answer 1

Var

S:real;

A:integer;

Begin

S:=0;

For A: = 11 to 99 do

if A mod 2 0 then S:=S+sqrt (A) ;

WriteLn ('S = ', S)

End.

Паскаль.Найти сумму корней квадратных из всех нечетных двузначных чисел