Ответы на вопрос:
1program krug; var s,l,r: real; const pi=3.14; begin writeln('введите радиус окружности'); readln(r); l: =2*pi*r; s: =pi*sqr(r); writeln('s=',s,' l=',l); end.2program appls; var m,p,c: real; beginwriteln('введите вес яблок'); readln(m); writeln('введите цену за 1 килограмм'); readln(p); c: =p*m; writeln('общая стоимость яблок составляет ',c,' рублей'); end.p.s. если ты будешь запускать программу в командной строке, то введи перед оператором "end" этот оператор: readln(); p.s.s площадь окружности s= r в квадрате
Популярно: Информатика
-
verahohlova11.12.2021 19:00
-
Mrmr5628.03.2021 15:20
-
vbvb200603.10.2021 21:32
-
Opasnaya200117.01.2022 04:49
-
sanzarerzanylu801.11.2022 17:30
-
Arina11193322.02.2020 03:02
-
Максим55511106.06.2023 14:13
-
filltema07.04.2021 04:02
-
yaroshenkopoli15.09.2021 10:48
-
coffeepro8014.08.2020 23:31