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

Рассчитать и вывести произведение чисел от 1 до 30

Ответ:

Strelok09245

04.10.2020 17:39

Program oneTO30
var
h:integer;
BEGIN
for int i:=2 to 30 do
h:=h*i;
writeln(h); \\или readln ... забыл
END.

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

Ответ:

isabayeva

04.10.2020 17:39

var i: integer; begin for i:= 1 to 30 do writeln(i);end.

Вот код вывода чисел от 1 до 30, либо я не понял вопроса, либо вам дорога не в программирование

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

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

Mishcka10200

07.08.2022 06:34

Как изменить масштаб фрагмента рисунка в программе paint...

AirinMandarin

07.08.2022 06:34

Как на паскале проверить число на нечетность? например, на четность так: а mod 2=0. а как проверить на...

nizametdinovaalina

25.05.2020 00:56

Какие виды соревнования в работотехники ты знаешь?...

sofyaoborina12

29.02.2020 01:02

Выполнить тест, если не можете справиться, то сделайте конспект теоретического материала. 1. Запишите значение переменной s, полученное в результате работы следующей...

sanya48481

09.09.2020 09:27

Дано: writeln (s:6:2);Если s=113,48102, то на экране появится ...

TatyanaKras

31.03.2022 19:16

Вывести на экран все двухзначные числа кратные 7 (паскаль, цикл до , пока , для )...

filimonovajulia1

16.04.2023 07:11

687 есеп 5 класс берем плмагите...

LizaIvaskevich

16.04.2023 07:11

Термометр қалай жұмыс істейді? ...

IKristin

16.04.2023 07:11

1. Каким должен быть период собственных колебаний колебательного контура, если он состоит из конденсатора ёмкостью 0,016Ф и катушки индуктивностью 0,004 Гн? 2.Каким должна...

sofa4565787

27.03.2020 17:42

Чему равна потенциальная энергия тела массой 450 г, находящегося на высоте 150 см?...

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

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