tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Склавиатуры вводятся целые
Склавиатуры вводятся целые числа a,b и c. если (a+с)*b меньше, чем 100-а, тогда выведите a-с, в противном случае напечатайте b+2*a.
Meager36655
2 15.08.2019 01:50
0
Ответы
vylko777Leybe
14.08.2020 14:22
Var
a,b,c:integer;
begin
writeln('vvedite 3 chisla');
readln(a,b,c);
if ((a+b)*c) < (100-a) then
writeln(a-c) else
writeln(b+2*a);
readln
end.
ПОКАЗАТЬ ОТВЕТЫ
shmakovaangeli
14.08.2020 14:22
Вроде так
var a,b,c:integer;begin readln(a,b,c); if ((a+b)*c)<(100-a) then writeln(a-c) else writeln(b+2*a);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
серый386
26.04.2020 16:48
Применение растровой графики по сравнению с векторной...
maitrewiva
26.04.2020 16:48
Напишите программу, которая считывает значения двух переменных a и b, затем меняет их значения местами и выводит их значения на экран. Начало и конец программы уже заданы в системе,...
Agetnor
26.04.2020 16:48
Применение логических элементов в таблице. Создать таблицу учебных предметов и рядом выставить все оценки успеваемости. в ФОРМУЛЬНОЙ строке С КАТЕГОРИИ ЛОГИЧЕСКОЙ выбираете ЕСЛИ...
mikhaillukashc
26.04.2020 16:48
1. Ниже приведены за к поисковому серверу.Постройте графические схемы для каждого из за Расположите обозначения за в порядке возрастания количества страниц, которые найдет поисковый...
Алижан025
21.04.2020 22:46
Решить на языке Паскаль! 1. Заполнить массив из 20 чисел случайными значениями в диапазоне от -40 до 40. Вывести на экран данный массив в строку и количество четных чисел. 2....
Alena11094
21.04.2020 22:46
Сколько значкщих нулей в двоичной записи восьмиричного числа 2501...
PapayaS
21.04.2020 22:46
9. Дан фрагмент электронной таблицы. Определите значения в ячейках C2 и С3 после копирования в них формулы из ячейки С1. *□С2 = 165, С3 = 170□С2 = 175, С3 = 180□С2 = 100, С3...
AkvaH2O
17.11.2020 16:53
Какой алгоритм называются линейным с ветвлением и цыклическим ...
malvinka011
10.09.2021 18:18
Создать 3 прогаммысделать код...
GeCUri
10.09.2021 18:21
Определите необходимую маску подсети для различных ситуаций. A. Адрес класса А, если в настоящее время сеть содержит 30 подсетей, в следующем году планируется увеличить их число...
Популярные вопросы
Опрелелите координаты г.кейптаун , г. владивосток...
1
Найти площадь ромба,если одна диогональ в 3 раза короче другой а их сумма...
3
Зчим взаємодіє мяч після удару ногою до падіння на землю...
1
13* + 10 = 6* - 4 решить кт уравнение...
1
Что из названного не относится к биотическим факторам? 1.миграция оленей....
3
Какую закономерность в расположении минеральных вод кавказа можно выделить?...
2
Мене затримала поліція, хулі робити?...
1
Решить определить интервалы возрастания и убывания функции y=3x^3-9x...
2
Заранее ♥ синтаксический разбор: в этой песне есть радостный звонкий переливы....
3
Два вантажні автомобілі перевезли 70 т вугілля. разом вони зробили 14 рейсів....
3
a,b,c:integer;
begin
writeln('vvedite 3 chisla');
readln(a,b,c);
if ((a+b)*c) < (100-a) then
writeln(a-c) else
writeln(b+2*a);
readln
end.
var a,b,c:integer;begin readln(a,b,c); if ((a+b)*c)<(100-a) then writeln(a-c) else writeln(b+2*a);end.