Информатика. Помогите пожалуйста, все это решается с помощью программы паскаль абц.

0 голосов
23 просмотров

Информатика. Помогите пожалуйста, все это решается с помощью программы паскаль абц.


image

Информатика (43 баллов) | 23 просмотров
Дан 1 ответ
0 голосов

Var d,l,pi: real;
begin
write ('d = '); read(d);
pi:=3.14;
l:=pi*d;
writeln ('L = ',l);
end.

(14.4k баллов)