tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны 2 числа.если они
Даны 2 числа.если они равны,то найти их произведение,иначе-частное
polinasmi1
3 26.08.2019 23:00
0
Ответы
annvs1
31.08.2020 22:17
Var x,y,p,t:real;
begin
read (x,y);
if x=y then p:=x*y else t:=x/y;
writeln(p,t);
end.
ПОКАЗАТЬ ОТВЕТЫ
2003veronika07
31.08.2020 22:17
Var
a, b: real;
begin
write('Введите 2 числа: ');
readln(a, b);
if a = b then a := a * b
else a := a / b;
writeln(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
rhenfzj
13.11.2021 16:40
Написать программу для вычисления функции по формуле для произвольных исходных данных, с двойной точностью в Turbo pascal...
stalker2000008
13.11.2021 15:36
Постройте схему, соответствующую заданной логической функции, на логических элементах «И», «ИЛИ» и «НЕ»...
multikonlive
13.11.2021 15:21
СРОООЧОЧОЧНЧООО Какую информацию следует представлять в таблице типа «объект – объект»? Сведения о морях, расположенных на территории России. Информацию о городских достопримечательностях....
0123220210
12.01.2020 15:25
Какое самое простое доказательство мастер-теоремы? можете, , его , или скинуть ссылку на доказательство....
tvoibati00
13.08.2019 12:10
2-3 примера суждений,в которых речь идет об объектах, изучамых на уроках информатики...
alesa12102006
13.08.2019 12:10
Установить, равносильны ли два высказывания. b∧¬a ¬(b∨a)...
mihaikl
07.05.2020 21:35
Какие можно получить фигуры из первичной фигуры с инструмента , Тяни/Толкай (рис. 5.20)?...
Cheather
07.05.2020 21:36
1. Чему будет равно значение, вычисленное в электронной таблице по формуле: =И(B1 2;ИЛИ(A1 10;A1 15)), если в клетке А1 находится число 27, а в клетке В1 - число 2 (ложь...
Chocolateteapot0507
21.05.2019 21:40
Составить программу: ввести , и чтобы программа: а) напечатала это слово по вертикали; б) переставила буквы слова в обратном порядке !...
5alo
21.05.2019 21:40
Делайте те кто ! 10 . укажите номера основных устройств, которые включены в состав персональной эвм: 1) системный блок 2) принтер 3) монитор 4) клавиатура. 11. какие основные...
Популярные вопросы
On sunday they went to the exhibition.( : перевод и время)...
3
Как рекламировать школу моей мечты на (10-15 предложений)...
2
Скажите ответ many people in russia live in the и ещё there are ten...
2
Щоб перетворити звичайний дріб 17_40 у десятковий , потрі...
3
Маган мынандай эссе керек комектесиниздершы: окушынын мындеты не? деген....
2
Самые тонкие- морфологический разбор...
3
Найдите медиану, проведенную к большей стороне треугольника, стороны...
3
Чему равна разность двух чисел, если она на 34 меньше уменьшаемого и...
1
№1.продолжите фразу. неметаллические свойства элемента-это №2.в периуде...
3
Годы жизни поэтов тютчев фет баратынский никитин бунин некрасов...
1
begin
read (x,y);
if x=y then p:=x*y else t:=x/y;
writeln(p,t);
end.
a, b: real;
begin
write('Введите 2 числа: ');
readln(a, b);
if a = b then a := a * b
else a := a / b;
writeln(a);
end.