Регистрация
dinbili2
05.06.2020 07:53
Информатика
Есть ответ 👍

тест по информатике ​

151
288
Посмотреть ответы 2

Ответы на вопрос:

юла115
юла115
4,7(70 оценок)

1. г)

2. б)

3. в)

4.а)

verailina1991
verailina1991
4,4(71 оценок)
Program n1; function isdel(n: integer): boolean; var t: integer; begin isdel: =false; t: =n; while n< > 0 do begin if n mod 10=0 then break; if t mod (n mod 10)=0 then isdel: =true else begin isdel: =false; break; end; n: =n div 10; end; end; var a,b,i: integer; begin readln(a,b); for i: =a to b do if isdel(i) then write(i,' '); end.

Популярно: Информатика