Переделать программу под оператор read program - вопрос №72298981314 от Татьяна1301 14.02.2021 00:54

Question

Информатика: Переделать программу под оператор read program n_1; const pi= 3.14; bar= r,c,s: real begin r: =5.4; c: = 2*pi*r; s: =pi*r*r; writeln ( c= , c: 6: 4); writeln ( s= , s: 6: 4) end

Татьяна1301 · Answer

Program n_1;var r,c,s: real;beginreadln(r);c:= 2*pi*r;s:=pi*r*r;writeln ( c= , c:6:4);writeln ( s= , s:6:4)end.Пример:5c=31.4159 s=78.5398...

Переделать программу под оператор read program n_1; const pi= 3.14; bar= r,c,s: real begin r: =5.4; c: = 2*pi*r; s: =pi*r*r; writeln ('c=', c: 6: 4); writeln ('s=', s: 6: 4) end

Переделать программу под оператор read program n_1; const pi= 3.14; bar= r,c,s: real begin r: =5.4; c: = 2pir; s: =pirr; writeln ('c=', c: 6: 4); writeln ('s=', s: 6: 4) end