Nertman45
?>

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

Информатика

Ответы

vadim1140

Program g;

Var

a:integer;

Begin

Readln(a) ;

Writeln(sqr(a)) ;

End.

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

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

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

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

annazhurawlewa
Karmelita1978
yfetyukov
mikek0906
samuilik-v
samuilik-v
Ubuleeva826
cashuta
dilovarnazarov1986
oyunabaduraeva
vladimirkirv
maksteks
sve34166163
ruslanchikagadzhanov
xsmall1