Войти Регистрация Спроси ai-bota

Вводится два числа. определить кратна ли 5 их сумма

Ответ:

2899101714lp

17.07.2020 15:18

Const n=10;
Var b,c;
a:array [1..n] of integer;
Begin
b:=0; c:=0;
For i:= 1 to n do
If a[i]>0 then b:=a[i]+b
else
inc(c);
Writeln(b,' ', c);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Uljainaabilkasim

24.03.2021 20:16

Сообщение, записанное буквами 32-символьного алфавита, содержит 70 символов. какое количество информации оно несет....

Catco111

16.03.2020 19:24

Информационное сообщение объемом 1200 битов состоит из 150 символов. какова мощность алфавита, с которого записано это сообщение?...

2006197909876

31.05.2021 19:19

РЕШИТЕ ОПРЕДЕЛИТЕ ОБЪЁМ ТЕКСТОВОГО СООБЩЕНИЯ, ЕСЛИ ОДИН СИМВОЛ КОДИРУЕТ ДВУМЯ БАЙТАМИ ОТВЕТЫ (1 15) (2 30) (3 240) КАКОЙ ПРАВЕЛЬНЫЙ...

Lbailieva

15.07.2021 06:38

Информатика 8 класс Найдите значения логического выражения (Х ≠ 4) V (X 7) для чисел 4, 7, 8....

arinalapshakova

16.09.2020 23:19

Проанализируй изображение. Что пропущено на схеме?...

justdoit5

12.07.2022 12:22

Цикл с предусловием. Урок 1 7 - Сопоставь данные, представленные в таблице.слева:1) while2) continue3) forсправа:А) используется при организации цикла с известным числом повторенияБ)...

Himimory

20.03.2021 01:49

Тест нужен ответ еще лутчий ответ...

nif4

31.07.2020 23:44

Почему некоторые виды транспорта используются исключительно для перевозки грузов?...

ivanchistyakov

31.07.2020 23:44

Кокой план борьбы с Ганнибалом осуществил римский полководец Спицион?...

ochensad

29.06.2021 01:09

Як ефективно навчатися вдома в умовах онлайн. Обсяг 170-200 слів....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку