Войти Регистрация Спроси ai-bota

Вывести на экран сумму кубов чисел от 2 до 14

Ответ:

24.05.2020 04:18

var i:integer;
Begin
for i:= 2 to 14 do
writeln(i*i);
End.

0,0(0 оценок)

Популярные вопросы: Информатика

kamilamih

14.01.2020 00:15

Состоит из имени логического диска, пути к файлу на диске и имени файла...

kamely98

14.01.2020 00:15

Чем отличается обычный и самораспаковывающийся архив одного и того же файла с одним и тем же именем?...

xap2

12.01.2023 04:31

Какое значение примет переменная с после выполнения следующего фрагмента программы: c:=0; d:=10; while d =0 do begin c:=c+1; d:=d-3 end;...

koop2

02.01.2020 15:15

Напишите на языке буду очень благодарен...

айеоник

29.08.2022 13:50

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

жандосЕУ

29.08.2022 13:50

Какая организация обеспечивает доступ к информационным ресурсам интернета...

alyastoun00

29.08.2022 13:50

Не работает программа на pascal. почему? program z; var n,i,a,b,r: integer; begin a: =0; b: =0; writeln( введите число учеников ); readln(n); for i: =0 to n do while...

olgaslizova

28.07.2022 10:36

На вход программы поступает натуральное число . требуется определить сумму цифр в десятичной записи этого числа , которые кратны 3(считается , что 0 кратно любому числу)....

marinandnatasha1

03.05.2020 00:55

Паша подготовил реферат по географии на 8 страниц в кодировке ASCII. Каждая страница содержит в среднем 64 строки, а каждая строка - 80 символов. На флешке у паши свободно...

butyuginap06qhe

07.06.2023 02:25

Y +2y=y можете решить с методом бернулли...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку