Требовалось написать программу, которая получает на входе натуральное число n и выводит число, которое получается из n после удаления всех пятерок, порядок остальных цифр при этом не меняется. Программист торопился и написал программу неверно, найдите неверную строку и исправьте ее.var n, r, t:longint; d:integer;begin readln (n); r:=0; t:=1; while n>0 do begin d:=n mod 10; if d=5 then begin r:=r+d*t; t:=t+1 end; n:=n div 10; end;writeln (t);end.
var n, r, t: longint d: integer begi readln(n) r := 0 t := 1 while n > 0 d begi d := n mod 10 if d <> 5 the begi r := r + d t t := t 10 end n := n div 10 end writeln(r) end.
var n, r, t: longint
d: integer
begi
readln(n)
r := 0
t := 1
while n > 0 d
begi
d := n mod 10
if d <> 5 the
begi
r := r + d t
t := t 10
end
n := n div 10
end
writeln(r)
end.