Почему паскаль abc выдает ошибку Встречено 'writeln' , а ожидалось ':' program n_2; const...

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

Почему паскаль abc выдает ошибку Встречено 'writeln' , а ожидалось ':'
program n_2;
const pi=3.14;
var r, c, s: real;
bedin
writeln('Вычисление длины окружности и площади круга');
write('Введите r>>');
readln(r);
c:= 2*pi*r;
s:=pi*r*r;
writeln ('c=', c:6:4);
writeln ('s=', s:6:4)

end.


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

Ты написал вместо "begin" bedin. И за константу Pi брать не надо. В системе Pi уже есть, поэтому начальные значения ей давать не нужно. У тебя программа должна выглядеть вот так:
program n_2;
var r, c, s: real;
begin
writeln('Вычисление длины окружности и площади круга');
write('Введите r>>');
readln(r);
c:= 2*pi*r;
s:=pi*r*r;
writeln ('c=', c:6:4);
writeln ('s=', s:6:4)
end.

0

Спасибо!!!

0

Не за что :)