PASCAL Найти число, обладающее следующим свойством: если в нем зачеркнуть последнюю...

0 голосов
53 просмотров

PASCAL Найти число, обладающее следующим свойством: если в нем зачеркнуть последнюю цифру, то получится число в 14 раз меньше исходного


Информатика (12 баллов) | 53 просмотров
0

Помагите мне

Дан 1 ответ
0 голосов

var a:integer;

begin

for a:=1 to 100 do  

if a div 10 * 14 = a then writeln(a)

end.

(1.7k баллов)