Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Мұғалімpvl
08.07.2022 12:47 •
Информатика
27 m=a+b/2, s=1/2*a*h расписать в паскале
Показать ответ
Ответ:
ала213
07.10.2020 03:04
Var m,a,b,h,s:real;
begin
writeln (a,b,h);
readln (a,b,h);
m:=(a+b)/2;
s:=0.5*a*h;
writeln (m);
writeln (s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Voproshayka
18.08.2022 04:35
Два овала дети и мальчики.впиши в овалы имена детей и сколько элементов в каждом множестве?...
Omigoooos3
12.09.2022 08:54
Осуществить циклический ввод элементов массива целых чисел [ q [ i, j] , i =1,3; j=1,2] с экрана (использовать функцию inputbox), найти наименьшие элементы каждой строки и поставить...
натахасуслик
12.01.2021 00:49
построить схему комбинационного устройства ... А) f = aΛbVaΛb Б) f = aVbΛ(bVa)Λa В) f = aΛ(aVb)V(bΛa)...
pyataevadasha
11.08.2022 11:44
Чему равно значение выражения 6 • 1024 • 1024 • 1024 • 8 битов быстроо дам много...
Antyan11
18.03.2022 04:03
Дана программа. beginwriteln ( dog );writeln ( Выучи слово! )end. На экране данные выведены следующим образом:1 dog Выучи слово!2 Выучи слово!3 dog4 dogВыучи слово!...
thiiagooBR
23.12.2021 07:21
Оценить информационный объём цифрового стерео звукового файла длительностью звучания 1 минута при среднем качестве звука (24 бита,16 кГц.) ответ дайте в килобайтах....
Gimngazia
16.06.2022 15:40
Загадано число из промежутка 64 до 128 какое количество числа и какое количество информации при этом получится ?...
Tustik777
28.09.2021 07:45
Напишите, , программу на языке паскаль начав тренировки, спортсмен в первый день пробежал 10 км. каждый день он увеличивал норму на 10% от предыдущего дня. какой суммарный путь...
Danchik2046
24.11.2022 03:22
Запишите все значения y(игрик),кратные числу 7 ,при которых верно неравенство 28...
аsiyt09
24.11.2022 03:22
Was born into the family of a poor shoemaker...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln (a,b,h);
readln (a,b,h);
m:=(a+b)/2;
s:=0.5*a*h;
writeln (m);
writeln (s);
end.