Написать программу, которая обеспечивает ввод последовательности чисел. Количество чисел в

Написать программу, которая обеспечивает ввод последовательности чисел. Количество чисел в последовательности безызвестно. Признаком конца последовательности является ввод 0. Программка обязана определять количество чисел, которые заканчиваются на 2 либо 6.

Задать свой вопрос
1 ответ
Program n1;
var a,k: integer;
begin
readln(a);
k:=0;
while alt;gt;0 do
begin
if (a mod 10=2) or (a mod 10=6) then
k:=k+1;
readln(a);
end;
write(k);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт