Nertman45
?>

Вычислить сумму квадратов чисел от 1 до 30. Квадраты чисел записаны в файл. на паскале

Информатика

Ответы

vadim1140

Program g;

Var

a:integer;

Begin

Readln(a) ;

Writeln(sqr(a)) ;

End.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Вычислить сумму квадратов чисел от 1 до 30. Квадраты чисел записаны в файл. на паскале
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Boris1247
utkinslava
anechcak
AlidzhanovDenis491
takerra
kengyra
vasilevich-F
mar1030
Khlustikova_Borisovna
pifpaf85
Захаров-Иванович
самир1078
info32
Ekaterina1654
Ruslanovich1217