Первое число N при вводе сообщает программе о том, сколько далее чисел будет введено. Далее вводится N целых чисел. Найти произведение трёхзначных
5-9 класс
|
чисел.
написать программу.
var a:array[1..1000] of integer;
s,i,n:integer;
begin
writeln('Vvedite N');
readln(n);
for i:=1 to n do begin
writeln('Vvedite chislo ',i);
readln(a[i]);
end;
s:=1;
for i:=1 to n do if (a[i]>99) and (a[i]<1000) then s:=s*a[i];
writeln('Proizvedenie 3 znachnix chisel = ',s);
end.
Другие вопросы из категории
е предыдущей. Сколько часов работала бригада?
каталоге хранится файл Задачи_по_программированию.tхt. В этом каталоге создали
подкаталог и переместили в него файл Задачи_по_программированию.tхt. После
этого полное имя файла стало
D:\INFORM\LESSONS\10_CLASS\Задачи_по_программированию.txt
A.ЖЁЛТЫЙ,СЕРЫЙ ,ПУРПУРНЫЙ
B.голубой, красный ,чёрный
c,белый,оранжевый ,лиловый
d,зелёный,красный,синий
Читайте также
ДВА РАЗА
ЗА ПЕРВОЕ ЧИСЛО МОЖНО ВЗЯТЬ 3,ЗА ВТОРОЕ 4
второго, "равно" — если числа равны, "меньше" — если первое число меньше второго. Сами числа выводить не нужно.
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
д количество чисел в последовательности, а затем сами числа.Количество чисел не превышает 1000. Введённые числа не превышают 30 000.Программа должна вывести одно число – количество двузначных чисел в заданной последовательности натуральных чисел.
Программа получает на выходе количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется числа, оканчивающиеся на 2
Количество чисел не превышает 1000. Введённые числа не превышают 30 000
Программа должна ввести одно числа - максимальное число, оканчивающиеся на 2