Работа с Паскалем. Вообще не понимаю как это делать. Помогите сделать хоть что нибудь

var   
a,r : integer;    
begin 
readln (a);// Сторона квадрата 
readln (r);//Радиус круга   
if a >= (r*2) then   
writeln (Поместиться)   
else   
writeln (Не поместиться); 
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку
×