Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ясмина115
24.01.2021 21:35 •
Информатика
Буду ! 1.зад даны 2 числа найти их сумму и произведение 2.зад дано 2 х значения число найти сумму его цифр 3.зад даны 2 числа найти их сред арифмитическое составить программу на языке паскаль
Показать ответ
Ответ:
gjhjcznrj
08.10.2020 05:19
1-zadacha
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('Сумма=',a+b);
Writeln('Произведение=',a*b);
end.
2-zadacha
var a:integer;
writeln('Введите двухзачений число='); Readln(a);
Writeln('Сумма цифр=', (a mod 10)+(a div 10));
end.
3-zadacha
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('сред арифмитическое=',(a+b)/2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
emilking
10.10.2021 00:33
Ира боря и алеша алеша закодировали по одному слову вот их коды...
IndiAkent
08.04.2023 21:43
Ккакому классу неорганических соединений относятся данные вещества cuo, h2s, cuso4, naoh и назовите их...
nekit120
08.04.2023 21:43
Укажите какой частью речи они являются определите их морфемный состав и образования: празднично,восхитительно,сильного,пора,вечером,днем,ночью...
egoskulik2015
08.04.2023 21:43
Букет из двух хризантем и одной лилии стоит 66 руб. причем лилия на 9 руб. дешевле хризантемы какова цена лилии цена хризантемы...
ArturJan2020
08.04.2023 21:43
Скажите *как можно одним словом назвать эти слова: мышление, деятельность, творчество...
Андртян
08.04.2023 21:43
Если дневную норму первого рабочего увеличить на 40%, а второго-на 20%, то за один день они изготовят 159 деталей.если дневную норму первого рабочего увеличить на 20%, а второго-на...
Nime15
08.04.2023 21:43
Вырази в квадратных сантиметрах- 7 дециметров в квадрате...
VOLKODAV770
08.04.2023 21:43
Гипотенуза прямоугольного треугольника равно 10 см. сумма катетов равна 14. найдите катеты треугольника?...
pfbrfyfnfkmz
08.04.2023 21:43
Подумайте, почему люди всегда стремились открывать новые земли....
инкар03
08.04.2023 21:43
Номер113 в январе было 14 солнечных дней,в феврале-на 6 дней меньше,чем в январе,а в марте-в 2 раза больше,чем в феврале.поставь вопрос и реши . номер 114 построй диаграмму количества...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('Сумма=',a+b);
Writeln('Произведение=',a*b);
end.
2-zadacha
var a:integer;
writeln('Введите двухзачений число='); Readln(a);
Writeln('Сумма цифр=', (a mod 10)+(a div 10));
end.
3-zadacha
var a,b:integer;
begin
Write('1-число='); Readln(a);
Write('2-число='); Readln(b);
Writeln('сред арифмитическое=',(a+b)/2);
end.