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

Составте программу вычисления произведения чисел от 1 до 10 1234 *10

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

полинадудка

27.07.2020 23:13

Информационные модели бывают ... Укажите один или несколько правильных вариантов ответа:символьнымирисованнымиобразнымисмешаннымизнаковыми...

Maria150305

05.11.2022 18:46

Которую нужно решить на паскале методом while. ввести число n и m, увеличить по +1 n до m циклом и вывести каждый шаг,...

Эрбол11111

15.11.2022 22:14

решить задание в паскаль ABC....

lizatrubach2002

15.11.2022 22:14

Напишите программу вычисления суммы чисел двузначного числа (на языке Паскаль), учитывая, что число может быть отрицательным...

Ампорик

03.05.2022 21:17

Напишите наименьшее число x, для которого истинно высказывание: НЕ (x 20) И НЕ (x нечётное Напишите наибольшее число x, для которого ложно высказывание: (x 72) ИЛИ (x не делится...

BARBARIC5665

07.10.2022 03:15

Паша написал программу для вычисления чисел геометрической прогрессии со знаменателем прогрессии 3. Определи, какое последнее число выведет на экран программа. program p1;...

lavelas2008

01.04.2021 03:22

Найдите пять отличий в двух вариантах форматированиядокумента:Весь XX век Россия пребывала в ранге великой научной державы-несмотрянаеё исходную политическую отсталость,котораялишь...

isakoksanka

20.09.2022 16:04

Вспортивных соревнованиях участвовали 140 девочек и 160 мальчиков. все они разделились на 10 равных по колличеству детей команд. сколько детей было в каждой команде? как написать...

Дарьялол1

20.09.2022 16:04

Гармонія людини і природи, як велика духовна цінність есе...

111леся199

20.09.2022 16:04

Как сделать морфологический разбор имени прилагательного?...

Ответ:

miloft

01.10.2020 12:30

Program Task;
Var i: Integer;
p: LongInt;
Begin
p := 1;
For i := 1 To 10 Do
p := p * i;
WriteLn('Результат: ', p);
ReadLn;
End.

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

Ответ:

moto5

01.10.2020 12:30

Var i,pr:integer;
begin
pr:=1;
for i:=1 to 10 do
pr:=pr*i;
writeln(pr);
end.

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

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

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