сервис вопросов и ответовс клавиатуры вводятся 10 чиселю найдите произведения делящихся среди них на 3. программа,помогитееее написать ее
5-9 класс|
|
Адэма999
29 марта 2014 г., 13:20:12 (10 лет назад)
Олька2703
29 марта 2014 г., 15:20:02 (10 лет назад)
var a:array[1..10]of integer;
i,s:integer;
begin
s:=1;
for i:=1 to 10 do begin
readln(a[i]);
if a[i] mod 3=0 then s:=s*a[i];
end;
writeln(s);
end.
Ответить
Другие вопросы из категории
Боря,Витя,гриша и Егор встретились на всероссийской олимпиаде по информатике. Ребята приехали из разных городов: москвы , Омска, Санкт-Петербурга и
Кирова. Известно что Боря жил в одной комнате с мальчиком из Кирова и ни один из этих двух мальчиков никогда не был ни в Москве, ни в санкт-петербурке. Гриша играл в одной комнате с мальчиком из Москвы, а вечерами к ним заходил приятель из Кирова. Егор и мальчик из Москвы увлекаются игрой в шахматы . кто из ребят откуда приехал?
Задание C1.
Добрый день, имеется вот такая ситуация.
Помогите, пожалуйста, написать условие, по которому бы проверялась принадлежность точки к закрашенной области.
Информатика .Срочно.
Запишите в виде предложения на русском языке смысл математической формулы: S=ab
Читайте также
1, С клавиатуры вводятся 10 натуральных чисел. Вычислить сумму четных элементов.
2, С клавиатуры вводятся 15 натуральных чисел. Подсчитать количество элементов, кратных 3 и 5.
3, С клавиатуры вводятся 10 натуральных чисел. Вычислить произведение чисел, больших 10, но меньших 20.
1, С клавиатуры вводятся 10 натуральных чисел. Вычислить сумму четных элементов.
2, С клавиатуры вводятся 15 натуральных чисел. Подсчитать количество элементов, кратных 3 и 5.
3, С клавиатуры вводятся 10 натуральных чисел. Вычислить произведение чисел, больших 10, но меньших 20.
В ПАСКАЛЕ!№1 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить сколько среди них чисел, кратных 4; №2 С клавиатуры вводятся 10
натуральных двузначных чисел. Определить
среднее арифметическое нечетных чисел;
№3 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить
верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.
помогите пожалуйста с free pascal :) 1. вывести на экран следующие числа: 5.8,5.9...6.8. 2.с клавиатуры задаётся цена 1 порции мороженого. вывести на
экран стоимость 1,2,..15 порций мороженого. 3.найдите сумму первых пятидесяти натуральных чисел,кратных 12. 4. с клавиатуры задаётся 10 чисел.найдите произведение чисел,меньших 10.найдите среднее арифметическое чисел кратных 3.
cпасибо огромное!
Вы находитесь на странице вопроса "с клавиатуры вводятся 10 чиселю найдите произведения делящихся среди них на 3. программа,помогитееее написать ее", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.