1 Kaspersky
2 Если нажать Пропустить
3 Предотвратить заражение компьютера вирусами
4 1 Компьютер
2 Антивирус
3 Вирусы с сайтов интернета (Можно просто - Вирусы)
1 12
2 2,3,4,9
3
var
n, m: longint;
d: integer;
begin
read(n);
m := 0;
while n > 0 do {1 на 0}
begin
d := n mod 10;
if d < 9 then begin
m := 10 * m + d; {домножили на 10}
end;
n := n div 10;
end;
write(m);
end.
Я думаю и образная и текстовая
роботы умеют ходить
и умеют читать и писать
я так понял твой вопрос