tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить блок-схему алгоритма
Составить блок-схему алгоритма и программу замены целых чисел x,y единицей, если они равны между собой и меньшим из них, если они не равны
zentronys
1 06.07.2019 23:30
0
Ответы
Тупая6666
02.10.2020 21:38
//PascalABC.NET
var
x,y:integer;
begin
readln(x,y);
if x = y then begin
x:=1;
y:=1;
end
else
if x < y then
y:=x
else x:=y;
writeln(x,' ',y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kall4
12.09.2019 19:50
Составьте программу которая формирует массив из 7 случайных чисел из промежутка [5; 10] и вычисляет их сумму...
palieva69
12.09.2019 19:40
Перевести из 10 сс в 2 сс, 8 сс и 16 сс числа: 835, 2063, 1741....
fghhjk1
14.05.2020 20:31
Нужно делать через программу Pascalvar a b cСкиньте скриншот, как вы сделали в паскале...
din46
22.04.2020 11:03
Запишите последовательность букв, кодирующую адрес указанного файла в сети Интернет. Доступ к файлу happy.htm, находящемуся на сервере sibline.ru, осуществляется по протоколу...
Alrksanr
22.04.2020 11:03
Задание:1. Изучи $30 стр. 160 -164 изучить параграф.2. ответы на во по теме. На компьютере ничего делать не нужно.- Как создать рисунок в среде Scratch?- Какие изображения...
Mafiy12
09.06.2019 15:20
Какой объем видеопамяти необходим для хранения четырех страниц изображения при условии, что разрешающая дисплея 640*350 пикселей, а количество используемых цветов равно...
rafael2008
20.07.2019 04:10
Периметр пятиугольника равен 60 см. три его стороны имеют длину 4 см каждая. две другие стороны m и n имеют одинаковую длину. чему равна длина стороны m?...
Daya98888888
20.07.2019 04:10
Вкаких професий должин быть компьютер? (надо 10 профессий и чучуть биографии)...
ariananasirova
20.07.2019 04:10
Автомашина шла по шоссе 3ч со скоростью 65.8 км/ч , а затем 5ч по грунтовой дороге. с какой скоростью она шла по грунтовой дороге , если весь ее путь равен 324,4км?...
zonanip
20.07.2019 04:10
Краткое описание в научном стиле про цветок розы...
Популярные вопросы
История возникновения и формирование физической культуры краткий доклад...
2
Морфологический разбор предложения «Сломает белочка , кончик веточки...
3
Бірде үй өртенді. Өртсадірушілер әлгі үйге келіп жеткенде алдарынан...
1
Чому в давнину губок зараховували до рослин...
1
Найдите площадь параллелограмма...
1
Замени выделенные слова местоимение it, they. ...
3
Переведите Hallo Leute,vielen Dank für eure E-Mail. Ihr lernt Deutsch?...
2
Тест 4сынып каз. тілі математика...
2
Выведите текст hello world используя переменную(python)...
2
Нало составить задачу по финансовой грамотности со сказочными героями.Пример:(извините...
1
var
x,y:integer;
begin
readln(x,y);
if x = y then begin
x:=1;
y:=1;
end
else
if x < y then
y:=x
else x:=y;
writeln(x,' ',y);
end.