Составте программу которая находит произведение всех натуральных…

41

Составте программу которая находит произведение всех натуральных чисел от 1 до 20

категория: информатика

ответить

в избранное

59

dima_dnepr

26 июля 2022

Var a,p: integer; begin p: =1; for a: =1 to 20 do p: =s*a; writeln (p); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Для заданной функции k=4,3*sin (e^ (1/d)+2) /

Арифметическое выражение 45 – 8

Даночисло k (0 < k < 11) и матрица размера 4 x 10. Найти сумму и произведение элементов k-го столбца данной матрицы

Составить программу нахождения суммы и разности двух чисел вводимых склавиатуры

Почему нельзя для выравнивания по центру использовать пробелы в начале строки?

Напиши в каждом окне цепочки J русское слово так, чтобы слова в цепочке J стояяли в словарном порядке. СЛОВА: чадо…

Помогите, пожалуйста, решить задачу!

Помогите пожалуйста: Что будет выведено на экран монитора в результате выполнения цикла for I: =1 to 3 do write

Даны целые числа a и b написать программу которая выводит сначала меньшее число затем большее (на языкепаскаль)

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...