Исправьте код 20 б program(infinity); begin const pi=3.14; var(i,s,r): real; writeln(bbedi radiys); readln(r); i: =2*pi*r; s: =pi*r*r; writeln(`i=`,i `s=`,s); end ошибка ожидался интефикатор паскаль авс

Molka2005 Molka2005    2   23.09.2019 06:30    1

Ответы
gleb21717 gleb21717  08.10.2020 11:38
Program infinity;
Const PI=3.14;
begin
Var I,S,r:real;
Writeln('BBEDI RADIYS');
readln(r);
I:=2*PI*r;
S:=PI*r*r;
Writeln('I=',I,'S=',S);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика