Ответы на вопрос:
1)
var num1, num2, i, res: integer;
begin
Write('Введите числа >>> '); {Нет -Ln, ввод чисел будет происходить на первой строке}
ReadLn(num1, num2); {Вводить числа через пробел, подряд}
res:=0; {Обнуляем счетчик, иначе результат будет неожиданный}
for i:=1 to num2 do res:=res + num1; {Прибавляем num1 к счетчику res num2 раз}
Writeln(res); {Выводим}
ReadLn
end.
2)
var a,b,P:integer;
kv:String;
begin
writeln ('Введите геометрическую фигуру kv или pr');
Readln(kv);
if (kv = 'kv') then begin
write ('Введите сторону квадрата');
readln (a);
P:=a*4;
writeln('P= ',P);
end
else begin
writeln('ВВедите a и b');
readln(a,b);
P:=(a+b)*2;
writeln('P=',P);
end;
end.
3)
var
a, b, c, P: real;
begin
writeln('Введите два катета прямоугольного треугольника:');
readln(a, b);
P := a + b; { <-- сумма катетов }
c := sqrt(sqr(a) + sqr(b)); { <-- гипотенуза с }
P := P + c; { <-- периметр P }
writeln('Результат:');
writeln(' c = ', c:0:2);
writeln(' P = ', P:0:2);
readln
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
seregamani01.09.2022 00:32
-
YanaAndreewna108.04.2023 15:10
-
Polina23040701.11.2020 03:01
-
o050513.11.2020 23:25
-
RL22818.02.2021 18:32
-
slavioglokolea7731.10.2021 05:00
-
КристинаВощевоз55528.05.2023 13:06
-
24674124804.01.2021 18:45
-
faridudin17.07.2020 13:38
-
magmadi114.11.2022 10:52
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.