язык программирования паскаль

rzaevibragim rzaevibragim    2   09.04.2020 17:15    0

Ответы
vickatrasyuk vickatrasyuk  13.10.2020 00:25

var  

 S:real;

 i:integer;

 a,b:integer;

begin

 write('Укажите левую границу - ');

 read(a);

 

 writeln;

 writeln;

 

 write('Укажите правую границу - ');

 read(b);

 

 for i:=a to b do

 begin

   S:=sqrt(i);

   write(S:1:2,'  ');

 end;

 

end.  

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика