Найти произведение квадратов натуральных чисел от O до N в паскале

в избранное

belanka

26 августа 2022

Program pr; uses crt; Var i,p,n: integer; BeginWriteln ('введите n'); readln (n); p: =1; for i: =1 to n do p: =p*(i*i); Writeln ('p=',p); readln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

На фото пять карандашей. Зеленый сидит рядом с оранжевым и красным, желтый между красным и синим

Дан масив из 10 целых положительных чисел, заполненный с клавиатуры

Являются ли перечисленные действия действиями с информацией: просмотр телепередачи; игра в шахматы; устное решение…

Придумайте способ кодирования цветов для 256-цветовой палитры

Составить блок-схему нахождения большого числа из трех A, В, С

3. Определите значение целочисленной переменной S после выполнения операторов (в виде таблицы) S=0; i=1; j=5 нц покаi

1. Выполните перевод: а) 10101112=… б) 721310 в) 10101,01012=г) 101000012=е) 125,3510

Дано 4-х значное число А. Нужно в бэйсике задать это число так, чтобы на экране она прописалось задом наперед

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: