tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Информатику. ввести 2 числа ,найти
Информатику. ввести 2 числа ,найти их сумму и произведение ,если произведение окажется положительным ,то выдать его на экран,а иначе выдать на экран сумму.
anasasiyakoval
2 14.06.2019 00:50
0
Ответы
КэтЗед
10.07.2020 20:24
Var
a,b:integer;
begin
readln(a,b);
a:=a*b;
if a>0 then
writeln(a)
else
writeln(a+b)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Сергей0081
21.02.2021 17:07
4. Запишите информацию о себе (возраст, се на секои классе учитесь) в четверичной системе инкасах...
fariii046
21.02.2021 17:05
Определите значение переменных a, b, с после ввода значений с клавиатуры программа: var a, b, c: real; begin readln (a); readln (b,c); end. Ввод значений с клавиатуры:...
дара333
21.02.2021 17:04
Составь лист с таблиц. Мультимедиа в HTML?...
Uknowmyname
21.02.2021 16:59
Дано целое число. Проверить, является ли оно кратным 4, или кратным 6. Из диапазона чисел от 150 до 350. Найти количество чисел кратных 12 из диапазона чисел от...
alanragibov02
21.02.2021 16:50
Как протестировать код program n_13_63; var a, b: integer; s, x: real; begin writeln (‘Подсчет суммы от продажи билетов’); writeln (‘Количество а непроданных билетов...
polykanasch201
21.02.2021 16:48
Изобразите в декартовой прямоугольной системе координат множество истинности для следующих предикатов: 1) P(x, y) = (y =x) &(y+x =0) &(y меньше или равно...
DixonVeit
21.02.2021 16:38
Задание в прикрепленном файле...
Mira12202
21.02.2021 16:35
Как искать элементы массива с определенными параметрами?...
Didi12EW
21.02.2021 16:34
20, 65, 90, 82, 70, 100, 27 - запишите в тетрадь номер груза когда багажник переполнится...
рома1325
21.02.2021 16:19
Автомат обрабатывает натуральное число N по следующему алгоритму: 1) Строится двоичная запись числа N. 2) Запись «переворачивается», то есть читается справа налево....
Популярные вопросы
Из перечия свойств живых организмов только для растения характериа...
1
Скласти 10 речень в питальній формі минулого простого часу ів...
2
Как это решать: 7(x-4)-3(5-2x)=4x-10...
1
На рисунке изображен план земельного участка. 25 м 7 м 10 м...
1
желательно с розписаным ответом...
2
1. Вкажіть, яке значення має вода для життєдіяльності організмів:...
2
Как правильно делать морфологический разбор правильно...
3
разложить на множители: 1) a^7+ a^5+ 2a^2+ 2;2) m^3n^2+m+m^2n^3+n;3)...
2
На рисунке изображён график функции f(x), определённой на отрезке...
3
5 Hi. My name s Lewis Evans. I m 12and I go to a big school...
1
a,b:integer;
begin
readln(a,b);
a:=a*b;
if a>0 then
writeln(a)
else
writeln(a+b)
end.