ПОМОГИТЕ СРОЧНО!!!
10-11 класс
|
в массиве a1,a2...a50 найти произведение чисел меньших или равных 2
Adilek2207
10 июня 2013 г., 2:49:43 (10 лет назад)
Sova7878
10 июня 2013 г., 4:56:16 (10 лет назад)
Program chik3;
const n=50;
var a,b:array[1..30]of real;
i:integer;
p:real;
begin
p:=1;
for i:=1 to n do
begin
read(a[i]);
if(a[i]<=2)then p:=p*a[i];
end;
writeln(p);
Ответить
Другие вопросы из категории
на остановке останавливаются автобусы №12, 19, 24, маршрутное такси №9, троллейбусы №13, 18 и несколько трамваев. сообщение о том, что к остановке
подошёл трамвай №5 содержит 3 бита информации. сколько маршрутов трамваев останавливается на данной остановке
вася и петя передают друг другу сообщения, используя синий, красный и зелёный фонарики. Это они делают, включая по одному фонарику на одинаковое
короткое время в некоторой последовательности. Количество вспышек в одном сообщении - 3 или 4, между сообщениями - паузы. сколько различных сообщений могут передать мальчики.
Читайте также
Помогите срочно, надо вариант 4! Сделать при помощи VBA и проверить в экселе
Вычислить значение функции по формуле. Значение аргумента x принадлежит[0,1;0,6]
вариант 4
Вы находитесь на странице вопроса "ПОМОГИТЕ СРОЧНО!!!", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.