Ответы и объяснения

2012-05-20T20:23:14+04:00

BEGIN

 

write('Введите а');
readln(a);

    for a to 6 do

      if a mod 5 = 0 then writeln(a,' \ ');

 

readln

END