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

  • Pauel
  • профессор
2013-10-18T11:35:26+04:00
Program hren; 
uses crt; 
var a,b:integer; 

BEGIN 
WRITELN('enter the number');
readln(b);
for a:=b downto 1 do 
begin 
write (' ', a); 
end; 
readln; 
END.

программа не компилировалась, не проверялась на компе