работа с Паскалем. Вообще не понимаю как это делать. Помогите сделать хоть что нибудь
Приложения:
![](https://st.uroker.com/files/b79/b795f121ac8442c43e5c303f974e9d18.png)
Ответы
Ответ дал:
0
var
a,r : integer;
begin
readln (a);// Сторона квадрата
readln (r);//Радиус круга
if a >= (r*2) then
writeln ('Поместиться')
else
writeln ('Не поместиться');
end.
a,r : integer;
begin
readln (a);// Сторона квадрата
readln (r);//Радиус круга
if a >= (r*2) then
writeln ('Поместиться')
else
writeln ('Не поместиться');
end.
Вас заинтересует
11 месяцев назад
11 месяцев назад
1 год назад
1 год назад
6 лет назад
6 лет назад
7 лет назад