tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Сформировать массив, состоящий
Сформировать массив, состоящий из 7 чисел. вывести на экран произведение всех чисел.
ДанилкаМаксимка
1 29.08.2019 18:50
0
Ответы
nadya8903
09.09.2020 12:47
Const
N = 7;
Var
A:array[1..N] of integer;
i:integer;
P:real;
Begin
P:=1;
For i:= 1 to N do
Begin
Read(A[i]);
P:=P*A[i]
End;
WriteLn('P = ',P)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
emilgaripov87
01.04.2019 19:00
Дано: а=d716, b=3318. какое из чисел c, записанных в двоичной системе, отвечает условию a...
xDVadiKSlivE
01.04.2019 19:00
Каждый из семиклассников является читателем, по крайней мере, одной из двух библиотек: школьной и районной. из них 25 человек бурут книги в школьной библиотеке а 20 в районной....
DeNiSNoNs
01.04.2019 18:05
Как найти корни уравнения ln(x)=1/x в интервале [0; 2] с погрешностью 10^-10? для определения границ минимального отрезка, на котором функции меняет знак, используйте шаг прогрессия,...
viginipinigivini
17.05.2019 14:34
Для чего предозначен процеср...
annareain252
15.04.2021 11:18
Python Напишіть програму яка пропонувала б користувачеві вирішити приклад 4*100-54...
КирилБадабумшик
15.04.2021 11:18
Урок 1 Ученик обратил внимание, что все профессионалы, когда рисуют дугу, перед построением фигуры рисуют пунктирные линии вокруг нее. Определи, для чего они это делают. Верных...
SpaniGar
06.04.2021 06:10
Сөздерді дұрыс орналастырып, сөйлем құра. . Ғарышкерлер аспан зерттейді кемесімен кеңістігін ғарыш...
Рвововоаоа
06.04.2021 06:10
Найдите грамматическую(-ие) ошибку(-и) в предложении(-ях). Запишите исправленный(-ые) вариант(ы) предложения(-ий).1) Согласно словарю, «раритет» - ценная редкая вещь, представляющая...
килр
06.04.2021 06:10
Рисуем на тему здоровое питание...
иришка19911
06.04.2021 06:10
Мәтінді оқы. Проблемалық сұрақ құрастыр...
Популярные вопросы
Що символізує зелений колір у казці ох зарание...
3
Что такое фразеологизмы ,,развесистая клюква,, ,,прокурорство ложе,, ,,путеводная...
2
Опять банку родник наполняет водой за 6с.сколько литров воды даёт этот родник...
3
Автомобіль перші 30 хв рухався зі швидкістю 40 км год а наступні 2 год зі швидкістю...
3
На сколько увеличилась общая масса автомобиля, когда в его бак долили 50 л....
1
Составить предложения с этими словами: experience qualification quality requirement...
1
Две тележки одинаковой массы движутся навстречу друг другу. скорость одной тележки...
3
Сколько килограммов керосина входит в пятилитровую бутыль?...
1
Петя ниже васи на 20%. на сколько процентов вася выше пети?...
2
Ділянка одного із ланцюгів днк має таку нуклеотидну послідовність тац ага тга...
3
N = 7;
Var
A:array[1..N] of integer;
i:integer;
P:real;
Begin
P:=1;
For i:= 1 to N do
Begin
Read(A[i]);
P:=P*A[i]
End;
WriteLn('P = ',P)
End.