tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны два числа а и в.найдите
Даны два числа а и в.найдите квадрат большего из них и, если это первое число, выведите "1", а если второе, то выведите "2". (а=5,в=7). решите на
вера731
2 13.06.2019 04:50
1
Ответы
45454521
10.07.2020 11:43
Program zz;
var a,b:integer;
begin writeln('Введите число A ');
readln (a); writeln('Введите число B ');
readln (b); a:=a*a; b:=b*b;
if a>b then writeln(a)
else writeln(b);
if a>b then writeln(1)
else writeln(2);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lerashherbakov
12.06.2019 20:20
Решите .(в паскале или конструкторе) получить массив из n случайность лежащих в интервале от -50 до 100, определить каких чисел в нем больше четных положительных или нечетных...
Haker2216
12.06.2019 20:20
Перевести число 110010 из десятичной системы счисления в двоичную. заранее ....
одногоВоло
12.06.2019 20:20
Мальчик никита,саша и руслан учатся в разных школах.они встретились после урока информатики, на котором каждый из них познакомился с одной из операционных систем: windows,...
loginov555
12.06.2019 20:20
Кроссворд по информатике. 6 класс. огромное ! 1.если каждый элемент множества в является элементом множества а, то говорят, что в - .(12 букв) 2.множество, которому принадлежат...
Salekhova58
12.06.2019 20:20
Перевести число 20 из десятичной системы счисления в двоичную. заранее ....
West31
28.08.2019 18:20
Укажите неверное высказывание : a )объект wordart можно добавить в документ при вкладки ленты вставка. в) текст объекта wordart нельзя впоследствии изменить. с) с объектом...
shahnozat02
06.10.2019 09:10
Дано двузначное число, которое не заканчивается нулем. вывести частное от деления первой цифры на вторую...
mamarika2001
10.08.2019 07:00
Тема: символьный тип в паскаль вычислить сумму порядковых номеров всех букв , входящих в слово sum ,...
MashaKun
10.03.2021 10:03
Приведите примеры из окружающей среды с составным условием...
Avetodor
10.03.2021 10:02
Дайте определение системное по...
Популярные вопросы
Опираясь на стихотворения Г. Р. Державина «На птичку», «Признание», «Река...
2
ӘӨлең мазмұнына сүйеніп, берілген сөздердің мағынасын табыңдар. Сөздер...
2
Вставьте слово в предложение, описывающее пищевую цепь орешник - петров...
3
Знайдіть f(x)=(x-1)^4до іть будь ласка...
2
Task 2 (16 points). Complete the text with the appropriate words. I like...
2
65Г. Объясни значения слов исловосочетаний вспыльчивый, не- сдержанный,...
1
Танні, у манн в Мурре и Млуан faul 3 Jahre alt einen Freund immer hungrig...
2
Песня о стеньки разина, и выписать рифмы до конца 1 части...
2
төмендегі мәтіннің әсерін зертте.Жазушы көңіл күйінің таабиғатпен байланысты...
2
Тапсырманы орындау үшін хрестоматияда берілген Кыз Жібек» жырының нұсқасын...
2
var a,b:integer;
begin writeln('Введите число A ');
readln (a); writeln('Введите число B ');
readln (b); a:=a*a; b:=b*b;
if a>b then writeln(a)
else writeln(b);
if a>b then writeln(1)
else writeln(2);
end.