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

Надо найти произведение чисел от 1 до 10 в pascal abc.

Показать ответ

Ответ:

Shkolnik1287

17.07.2020 16:28

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

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

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

IG77

20.07.2020 15:57

(1) Сколько элементов =10 в массиве А[1..10,1..10] , если вначале они равны 0 For i:=1 to 5 do For j:=1 to 5 do begin A[i,j]:=A[i,j]+5; A[j,i]:=A[j,i]+5; (2)Сколько есть программ...

Kakashka2001

04.03.2020 22:22

Вшколе 200 учащихся,половина которых старшеклассники. кто то из них разбил оконное стекло.директор выяснил, что это сделали учащеися младших классов. сколько информации получил...

JHope23

11.01.2021 10:46

для регистрации на сайте некоторой страны пользователю необходимо придумать пароль длиной ровно 11 символов в пароле можно использовать десятичные цифры и 12 различных символов...

Tonibaskakov

07.09.2022 16:35

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

настя7353

09.08.2020 22:09

90 ! ! информатика олимпиада 7 класс! в современной вычислительной технике информация хранится как последовательность байтов. существует два хранения последовательности: записывать...

Rookgolf60

28.01.2023 00:11

Впоследовательности чисел 2, -10, 10, -1, -5, 9, 4 найдите набор из идущих подряд чисел с максимальной суммой элементов. в качестве ответа выведите искомую сумму....

annakokesnik

29.05.2022 00:35

Рябят кто может с раскраской фотошопе ...

iratupikp00q9c

21.11.2022 14:30

На вероятность. в урне находятся 5 белых и 6 чёрных шаров. из неё извлекают последовательно 2 шара и не возвращают обратно. найдите вероятность того, что вторым извлечён чёрный...

kiska510

21.11.2022 14:30

Y=(2x-3)^3 решить , , полное решение...

morni228

10.04.2021 17:42

Разложите на множители многочлен: а)ab-8a-bx+8x= б)ax-b+bx-a= в)ax-y+x-ay= г)ax-2bx+ay-2by= решить это плачу 20...

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

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