Написать программу, которая вычислит площадь трапеции, по введенным основаниям и высоте, которая выведет сообщение является ли трапеция равнобедренной, боковые стороны вводятся случайным образом.
241
331
Ответы на вопрос:
var
a: integer;
b: integer;
h: integer;
begin
writeln('Введите основания, затем высоту: ');
readln(a,b,h);
writeln ((a+b)/2*h);
end.
Объяснение:
//pascalabc.net //версия 3.3. сборка 1583 (25.11.2017) begin var fio: =readlnstring('введите фамилию имя отчество-> '); var b: =0; for var i: =1 to fio.length-1 do if (fio[i]='м') or (fio[i]='м') then b+=1; if b< > 0 then println('буква "м" есть в строке. она повторяется',b,'раз(а).') else println('буквы "м" нету в строке.'); end. пример: 1) введите фамилию имя отчество-> миг мария моисеева буква "м" есть в строке. она повторяется 3 раз(а). 2) введите фамилию имя отчество-> петренко петр петрович буквы "м" нету в строке.
Популярно: Информатика
-
yourbae29.08.2020 15:34
-
сашамо14.03.2021 07:00
-
Anastasiay2923.03.2021 15:12
-
Profesor24514.10.2021 07:57
-
Dasha1603200513.11.2022 10:32
-
Foxy415220.01.2020 20:32
-
приветпомогипж227.11.2021 22:02
-
мышка7226.09.2022 15:24
-
WaterdropE25.10.2021 06:34
-
Влад505518.07.2020 00:35