1. Информатика
  2. Организовать цикл для ввода

Организовать цикл для ввода 7-ми чисел и подсчитать ,сколько из них делится на 9

elf35 elf35    3   25.08.2019 09:20    0

Ответы
gulaydavay gulaydavay  05.10.2020 18:26
Program f1;
var a: array [1..7] of integer;
k,i :integer;
for i:=1 to 7 do 
readln(a[i]);
for i:=1 to 7 do 
if a[i] mod 9=0 then k:=k+1;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lera1059 lera1059  18.09.2019 11:29
На странице содержится 40 строк по 60 символов каждой строке. определите (в кбайт) объем текстовых данных на странице, если использовано таблицу кодирования ascii....
даша3645 даша3645  18.09.2019 12:00
Даны действительные числа х и у, напишите программу вычисления ( |х-у| )/(1+|ху|). результат округлите до двух знаков после запятой. умоляю не шарю в информатике...
Kamelotka Kamelotka  18.09.2019 12:00
Решить . найти сумму элементов массива. кол-во элементов = 10. сами элементы генерируются случайным образом на интервале [-50; 50]....
Максим56065 Максим56065  18.09.2019 12:00
Всем нужна по информатике.по паскалю составе по вычислению sin a*cos b+cos a*sin b у меня как бы я не пробовал не получается )...
anastasija193p07d7p anastasija193p07d7p  17.06.2019 15:10
Даны два двоичных числа определить их сумму разность произведение и частное от деления: 0,01001 и 0,00101...
Tanecka2501 Tanecka2501  30.06.2020 23:11
Составьте программу,соответствующую блок-схеме:...
Vilhctein1989 Vilhctein1989  30.06.2020 11:03
Составить программу на C++ для решения следующей задачи. Дан массив А, состоящий из 10 действительных чисел. Обменять местами минимальный и последний элемент массива. Массив...
aleks201610 aleks201610  30.06.2020 11:19
Объяснить принципы проектирования при хранении документов учета (накладных, расходных и приходных ордеров итд) (раскрыть смысл табличной части)....
kokocuk01 kokocuk01  30.06.2020 11:55
С++ Оклад сотрудника предприятия N рублей. Определить заработную плату сотрудника, учитывая премию - 25% от оклада, и вычет подоходного налога (12% от общей суммы). В качестве...
Мальвина01 Мальвина01  30.06.2020 11:57
Назовите основные принципы операционной системы Linux. ПОЖ...

Популярные вопросы