программирование циклов :
Составьте программу по которой компьютер десять раз запросит ввод целых чисел и в результате сообщит сколько среди введённых чисел чётных и сколько нечётных

В ПАСКАЛЕ С ИСПОЛЬЗОВАНИЕМ WHILE или REPEAT или FOR только без скобок квадратных , дам 40 БАЛЛОВ

вместо inc(k) написать k:=k+1;

if mod проверяет кратность. while to do - цикл, можно заменить фор, только смысла нет. Тем более в задании "WHILE или REPEAT или FOR", то есть одно из трёх.

 //если x четный , как можно записать по другому эту фразу , через вритлн ? или как , чтобы не было ////

//если x четный - это комментарии, чтобы вам было понятно что тут происходит. "//если x четный" и "//увеличиваем k на 1" можно убрать вообще

спасибо, побольше бы таких как , ты ведь главное не списать , а понять