tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составте программу вычисления
Составте программу вычисления произведения чисел от 1 до 10 1*2*3*4* *10
nikaz1
1 27.05.2019 05:10
1
Ответы
221967
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.
ПОКАЗАТЬ ОТВЕТЫ
kristina13131
01.10.2020 12:30
Var i,pr:integer;
begin
pr:=1;
for i:=1 to 10 do
pr:=pr*i;
writeln(pr);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Anny2007Bell
18.01.2021 18:33
Робототехника тарихы және болашағы Робототехниканың даму перспективасын анықта.биороботтарға бұлшықет салуүйді тазалауға арналған әмбебап робот жасаусупер робот-манипулятор жасауғажайып...
0007инкогнет0007
18.01.2021 18:31
Кестені орындап беріңіздерші.Сіздерден өтінемін. береміз.Сіздер үшін.Бізге бұр дәл қазір керек болып тұр...
Настя133102200520062
18.01.2021 18:30
1. Откройте программу Word 2007 и введите по 5 разных графиче- символов, используя графические шрифты MS Outlook,Webdings, Wingdіngѕ. Сохраните документ в файле с именем зада-ние 3.1.1.docx...
romandichii1
27.09.2019 15:50
Придумайте 15 правил по технике безопасности с компьютером...
KVASSok
27.09.2019 15:50
Вычислите сумму двоичных и десятичного чисел 110^2+14^10 . представьте результат в десятичной системы счисления....
9305153
09.01.2021 12:34
НА Python Вы вводите с клавиатуры любое количество слов (оканчивая его ключевым сочетанием “конец списка”), после чего вводите одно целое число – число групп. Слова на группы надо...
мир285
09.01.2021 12:34
Алгоритм работы процессора. ...
Нурсултан05072017
09.01.2021 12:43
НА Python У вас есть с собой T (T вводится с клавиатуры) золотых монет. Местные жители согласились продать вам припасы, но у них есть странный ритуал. Всего в деревне n (n вводится...
Rinana1298
22.05.2019 03:30
Написать программу, которая суммирует n отрицательных четных чисел из вводимых с клавиатуры чисел, при вводе n=0 выход из программы....
Даньок8
22.05.2019 03:30
Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа), перемещающую...
Популярные вопросы
Объединение ремёслиников одной спецальности...
2
Нужно подобрать 3 слова -и е , е окончание, а что такое и не написано....
1
Отметь часть речи, вместо которой могут употреблять личные местоимения. имя существительное,...
1
Чем знаменит лжедмитрий 1? ответьте...
1
Только не с ! one of the first steps in the process of becoming successful is to...
3
Запишите в виде десятичных дробей: а)1/8 3/8 5/8 7/8 б)1/200 3/20021/200 в)1/125...
3
Пришла бабушка с сумкой, поклонилась пню и пошла дальше синтаксический разбор...
3
закончи строку. напиши не менее двух слов - образец: [a: ] farm, dark, car, are....
2
Представьте,что на землю прилетели инопланетяне какие бы вопрлсы вы им задали? какие...
1
Сколько секунд, минут, часов, дней в годе? . зареннее !...
3
Var i: Integer;
p: LongInt;
Begin
p := 1;
For i := 1 To 10 Do
p := p * i;
WriteLn('Результат: ', p);
ReadLn;
End.
begin
pr:=1;
for i:=1 to 10 do
pr:=pr*i;
writeln(pr);
end.