Написать программку ( в Pascal abc): Вводится 3 целых числа. Сколько

Var a:array [0..5] of Integer; n,h,i:Integer;
begin
h:=0;
for i:=0 to 5 do
Readln(a[i]);
for i:=0 to 5 do
if (a[i] mod 2=0) and (a[i] mod 10=8) then
Inc(h);
Writeln(h);
readln;
end.

Серега 2019-09-03 11:16:32

Судя по коду ,здесь цельная программка,которая не подходит заданию

Колька Кмольянов 2019-09-03 11:22:10

в Pascal abc не работает.

Иван Бородников 2019-09-03 11:29:24

потому что в паскале абс нету динамических массивов

Даша Оброкова 2019-09-03 11:38:46

Задание "Написать программку ( в Pascal abc)"

Оксана Ботухова 2019-09-03 11:45:59

ой заместо var a:array of Integer; написать var a:array [0..5] of Integer;

Семён Чионов 2019-09-03 11:55:22

это разве проблемма?

Вовка Стреколовский 2019-09-03 12:04:17

*проблема

Antonina Chervotenko 2019-09-03 12:14:02

Необходимо писать правильное решение.

Василиса Тумеркина 2019-09-03 12:22:02

все

Даниил Шафорост 2019-09-03 12:26:37

сейчас поправил

О проекте

Написать программку ( в Pascal abc): Вводится 3 целых числа. Сколько

Добро пожаловать!