По русски напиши это тебе не страна
Var
a,b,c,s:integer;
Begins:=0;
writeln('Введите 3 числа');
readln(a,b,c);
If a mod 2=0 then s:=s+1;
If b mod 2=0 then s:=s+1;
If c mod 2=0 then s:=s+1;
writeln('Количество четных чисел=',s);
end.
Ожог об плиту, порез ножом, неаккуратное вождение и тд
Чистота, это самое главное на планете! Ее нужно сохранять. С этих слов я бы хотел начать это сочинение.
Каждый из нас понимает, чем больше мусора на планете, тем больше проблем, больше грязи, неприятного запаха, загрязнение окружающей среды. Мы скоро утонем в этом мусоре!
Давайте, мы будем каждый год провобить акцию "Чистый город", которая поможет очистить улицы от грязи и мусора.
НАЧАЛО ЕСТЬ!)
Перезагрузка не поможет, только переустановка Windows, слетел какой то компонент