1. Информатика
  2. Найти произведение натуральных

Найти произведение натуральных чисел от 1 до 10

ksysharoma123 ksysharoma123    3   14.03.2019 13:40    1

Ответы
dasha45da dasha45da  25.05.2020 07:29

Program n1;
Uses CRT;
Var i,p: integer;
begin
ClrScr;
p:=1;
For i:=1 to 10 do
p:=p*i;
Writeln(p);
readln
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
annashiklo annashiklo  12.09.2019 11:20
Уперіод існування якої форми держави з явилися і проявлялися в системі іння такі принципи король є першим серед рівних...
лисичка132 лисичка132  12.09.2019 11:20
Гена шифрует слова, записывая вместо каждой буквы её номер в алфавите (без пробелов). номера букв даны в таблице: а 1 й 11 у 21 э 31 б 2 к 12 ф 22 ю 32 в 3 л 13 х 23 я 33 г 4 м 14...
ryssik ryssik  12.09.2019 11:20
Напишите программу на языке паскаль к уравнению y=sqrt(x)/x^m+cos(z)...
максим1723 максим1723  16.05.2019 09:10
1)какие сигналы поступают в цп? 2)какие сигналы поступают от цп при чтении данных из оп?...
sanay06 sanay06  16.05.2019 09:10
8. компьютерный вирус - это а средство нейтрализующее несанкционированные действия; средство для проверки дисков; программы для отслеживания вирусов; d. файл, который при запуске заражает...
mekhronaismatov mekhronaismatov  16.05.2019 09:09
1. в вагоне метро 128 пассажиров. какое количество информациисодержится в сообщении о том, что на остановке выходит 1 пассажир? 2. сообщение о том, что из корзины с разноцветными шарами...
Утешитель Утешитель  16.05.2019 09:08
Какое значение примет переменная y после выполнения фрагмента программыy=0; x=10; while x 0 dobeginx=x-2; y=y+xend,​...
аленаzm аленаzm  16.05.2019 09:07
Определите значение переменной c после выполнения фрагмента алгоритмаa : = 30; b: = 6: a : = a/2 * b; if a b thenc: = a - 3* belse c: a oh 3 * b​...
olya363 olya363  16.05.2019 09:06
Информатика, второй раздел, где...
Adriet Adriet  16.05.2019 09:04
Синфой, первый два нужно решить!...

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