1. Информатика
  2. Составить программу на паскаль(цикл

Составить программу на паскаль(цикл с параметром) ! вот : 1+4+9++100

mariya8309662072 mariya8309662072    2   17.04.2019 20:16    1

Ответы
arinamal1 arinamal1  07.06.2020 19:44

Объяснение:

var A:array [0..30000] of longint;

n,i,sum:integer;

begin

n:=10;

for i:=1 to n do begin

 n:=i*i;

 write (n,'+');

 sum:=n+sum;

 end;

writeln (' Сумма = ',sum)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Карисёнок Карисёнок  14.09.2019 00:20
1.в одной из кодировок каждый символ кодируется 8 битами.определите размер следующего предложения в данной кодировке: слух обо мне пройдет по всей руси великой. 2. в одной...
Дамирка2288 Дамирка2288  14.09.2019 00:20
Выберите имена файлов удовлетворяющие шаблону a? b* 1)a1b11.11 2)ab.ttt 3)aacb.t 4)a1b.tx 5)a11bc.t 6)a1b1.t1...
anitayun0518 anitayun0518  14.09.2019 00:20
Дано натуральное число. выведите его последнюю цифру. с питонтютора, подалуйста!...
kristishkalniza kristishkalniza  01.05.2020 22:00
Какая команда будет выполнена после следующих действий? 1. Нажми на вкладку Файл и потом нажми на Сохранить как. 2. В поле Имя файла напиши название презентации, затем...
olgafedotova2017 olgafedotova2017  01.05.2020 22:00
3. В тетрадь в конце текста под названием «Формулы и выражениянапишите формулы, которые вы знаете по предмету физики.И под каждой формулой напишите разъяснения величин,составляющих...
AngelinaMail11 AngelinaMail11  01.05.2020 22:00
Дано уравнение sin x2 + cos x2-8x = 0 методом деления отрезка пополам. Известно, что значение корня находится на отрезке [0; 1]. Решите уравнение двумя Напишите программу...
kurbanov2017p05b7v kurbanov2017p05b7v  10.06.2019 18:40
Рисунки, схемы , карты, фотографии -это информация( слово из 11 букв! )...
ВалерияЛера11111 ВалерияЛера11111  26.03.2020 12:54
Вводится последовательность натуральных чисел. Признак конца ввода - ноль. Необходимо проанализировать подпоследовательности из подряд идущих чисел «`2`» и вывести количество...
салссо1232960 салссо1232960  26.03.2020 12:54
Какие преимущества использования электронных таблиц по сравнению с бумажными?...
ariannaajoseph9 ariannaajoseph9  26.03.2020 12:55
Дана последовательность целых чисел, не превосходящих по модулю `10000`. Ноль - признак конца. Вывести минимальное произведение двух элементов этой последовательности....

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