ПОМОГИТЕ, ПОЖАЛУЙСТА!!!! Вычислить сумму квадратов чисел от 1 до 30. Квадраты чисел записаны в файл. на паскале
Ответы
Ответ дал:
0
Program g;
Var
a:integer;
Begin
Readln(a) ;
Writeln(sqr(a)) ;
End.
Похожие вопросы
1 год назад
2 года назад
2 года назад
7 лет назад
9 лет назад