Помогите пожалуйста, информатика 7 классДаю 10 баллов

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

Помогите пожалуйста, информатика 7 класс
Даю 10 баллов


image

Другие предметы (14 баллов) | 15 просмотров
Дан 1 ответ
0 голосов

Попробуй так:
program wtf;var S,L,pi:real;R:integer;begin writeln ('Введите R');readln (R);pi:=3.14;L:=2*pi*R;S:=2*pi*R*R;writeln('Длина окружности= ',L);writeln('Площадь окружности= ',S);end.

(110 баллов)