Program name;
const n=5;
var
m:array[1..n] of integer;
i,t:integer;
begin
writeln('Введите ',n,' елементов массива');
for i:=1 to n do readln(m{i});
t:=m{1};
for i:=2 to n do t:=t*m{i};
write('вывод массива: ');
for i:=1 to n do write(m{i},' ');
writeln(#13#10,'Результат произведения элементов массива: ',t);
readln;
<span>end. </span>

0 0

4 года назад

Спасибо всем заранее) Сравните окна папок в ОС Windows и Linux и выясните, чем они различаются. Какие элементы окна присутствуют

UgoLob [39]

Объяснение:

Отличие иконки интерфейс система

0 0

4 года назад

Помогите пожалуйста... Аськин, Баськин и Васькин стали свидетелями ограбления банка. Во время расследования Аськин сказал, что в

evgen0510

Баськин и Васькин назвали правильно цвет (красный, не синий), а Аськин - марку автомобиля (Тойота).

Ответ - красная тойота

0 0

4 года назад

Помогите составить несколько вопросов на тему "Горячие клавиши или как обойтись без компьютерной мыши" Вопросы должны быть таким

defoxx

1) Можно ли вызвать командную строку в Windows без использования мыши? (Да)
2) Существует утилита "Экранная клавиатура" , а утилита "Экранная мышь" ? (Нет)

0 0

4 года назад