Найти сумму кратных 8 среди трех значных натуральных чисел
5-9 класс
|
Program primer;
Var sum,i,n,ch:integer;
Begin
sum:=0;
write(' skolko budet chisel? ');
readln(n);
for i:=1 to n do
begin
write('Vvedite chislo ',i,' : ');
readln(ch);
if ch mod 8 = 0 then
sum:=sum+ch;
end;
writeln('SUMA chisel kratnyh 8 = ', sum);
End.
Другие вопросы из категории
Перераспределить значения переменных х,у, z. Выяснить, существуют ли треугольник с длинами сторон x, y, z. Ответ дайте в текстовой форме существуют или не существуют.
следующие сведения :
Егор : Разбил Андрей
Оля : Разбила Света
Надя : да ,Оля права
Вика : Андрей не бил
Света : Вика разбила
Миша : Это кто-то с улицы
Коля : Это либо Вика , либо Света
Андрей : Ни Вика , ни Света этого не видели .
Кто разбил окно , если известно , что из этих восьми высказывании истинно равна 3 ?
Ответ запишите в виде первой буквы имени .
информация- это…
действия с информацией- это …
Читайте также
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
1. С клавиатуры вводится 7 целых чисел. Найти сумму всех нечетных среди них.
2. С клавиатуры вводится 7 целых чисел. Найти произведение чисел кратных 7.
(Информатика. Тема: Pascal ABC. 8 класс)
2, С клавиатуры вводятся 15 натуральных чисел. Подсчитать количество элементов, кратных 3 и 5.
3, С клавиатуры вводятся 10 натуральных чисел. Вычислить произведение чисел, больших 10, но меньших 20.
(Тема:Программирование ветвлящихся и цепленных алгоритмов)
2.Дано двухзначное число,найти сумму и произведение его чисел.
(2-ая задача решается с div и mod)
(Тема:Программирование ветвлящихся и цепленных алгоритмов )