Ответы на вопрос:
Var r,s: real; begin readln(r); s: =0; if r> 10 then s: =4*r*r else s: =2*r*r; writeln(s); end.
Популярно: Психология
-
Образуйте и запешите от кратких имён прилагательных полную форму. 1.(каков?...
kostan555ua15.05.2023 08:15 -
Охарактеризуйте деятельность насекомых-вредителей сельскохозяйственных...
us0504200718.04.2023 00:56 -
Из села в город выехал мотоциклист со скоростью 53 км/ч. в тоже время...
Stasya198529.04.2023 06:46 -
Напишите изложение ! выразительно прочитайте текст известного журналиста,...
whiteandblackca27.11.2021 07:20 -
Ая связь покрыла 2/7 населения города, а во второй 3/7 его части. какая...
Света20200202.04.2020 01:31 -
Розкрийте лекситчне значення слів охра есе кисет і кресати відповідь...
Рофлер16.02.2022 02:12 -
Медвежонок быстро побежал к медведице разобрать по членом...
mila1711116.08.2021 20:28 -
Синтаксический разбор предложения со схемой. многими ярусами были навален...
KseniaFlowers02.01.2022 04:25 -
Вагон двигается равномерно под уклон с горы проходит 120 м за 10 с спустившись...
МАМБЭТ10.01.2021 23:52 -
Прямокутники abcd і mnkl рівні між собою.знайди сторони прямокутника mnkl,якщо...
Kotvo4cah11.11.2022 19:14