Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
даша3646
09.04.2023 20:15 •
Информатика
Написать программу вычисления выражения (5а-3)(4-3b)+c
в паскале
Ответ:
avinokurova3alina
10.10.2020 15:57
Var a, b, c: integer;
begin
readln (a, b, c);
writeln ((5*a-3) * (4-3*b) + c);
end.
Поясняю за код:
Первой строкой задаём переменные (аbc) и обозначаем их тип (здесь: integer - целые числа, при необходимости - замени на числа с плавающей точкой);
Второя строчка - для красоты, необязательна;
Третья - начало программы;
Четвертая - считывает с клавиатуры переменные аbc;
Пятая - выводим на экран результат выражения,
Шестая строка - конец.
---Так же можно было задать новую переменную d (что бессмысленно, но, наверное, пока именно этот вариант тебе подойдёт)
var a, b, c, d: integer;
begin
readln (a, b, c);
d:=((5*a-3) * (4-3*b) + c);
writeln(d)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
chiastr
21.08.2020 20:32
Книга содержит 129 страниц. На каждой странице 38 строк. В каждой строке 55 символов (включая пробелы). Найти информационный объём текста, считая, что каждый символ кодируется...
ruslankasaev
08.01.2023 03:13
33. последовательность чисел вводится последовательность целых чисел, заканчивающаяся нулем. преобразовывать последовательность следующим образом: 1) заменить отрицательные...
2047liza
06.06.2020 01:14
Энциклопедия или справочник для того,кто собирает информацию...
Zhanaevakasiet
06.06.2020 01:14
Набор символов,используемых для записи сообщения...
ThePashka
25.12.2020 17:26
Почему при сильном уменьшении яркости синего цвета фотография приобретает желтоватый оттенок...
DizlPlayS
30.12.2020 12:15
УРАВНЕНИЕ ОПЯТЬ: х + 5 - 2х + 3 = 0 ПОДНАЖМИТЕ, ЗА ЛУЧШИЙ ОТВЕТ ПОСТАВЛЮ ЛУЧШИЙ ОТВЕТ!...
maymiz
24.03.2023 04:17
Докажите, что эволюция жизни на ранних этапах (архее, протерозое) создала предпосылки для кардинального изменения облика планеты...
fomenko6
16.08.2020 17:42
Верны ли следующие суждения о социальной дифференциации? А. Социальная дифференциация — это разделение общества на группы, занимающие разное социальное положение. Б. Социальная...
maria27012007
16.06.2020 15:15
Тест на тему: Организмы и факторы неживой природы 1. Условия существования животных и их взаимоотношения с окружающей средой изучает: А) этология Б) экология В) биология...
VikaYastremska
24.08.2020 15:04
плс даю сочинение рассуждение на текст диво дивное автор л.Кассилю плс...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln (a, b, c);
writeln ((5*a-3) * (4-3*b) + c);
end.
Поясняю за код:
Первой строкой задаём переменные (аbc) и обозначаем их тип (здесь: integer - целые числа, при необходимости - замени на числа с плавающей точкой);
Второя строчка - для красоты, необязательна;
Третья - начало программы;
Четвертая - считывает с клавиатуры переменные аbc;
Пятая - выводим на экран результат выражения,
Шестая строка - конец.
---Так же можно было задать новую переменную d (что бессмысленно, но, наверное, пока именно этот вариант тебе подойдёт)
var a, b, c, d: integer;
begin
readln (a, b, c);
d:=((5*a-3) * (4-3*b) + c);
writeln(d)
end.