Регистрация
ffff40
14.11.2021 16:04
Информатика
Есть ответ 👍

Составьте программу, заменяющую меньшее из двух данных чисел суммой, а большее – произведением этих чисел. с оператора выбора- case

125
169
Посмотреть ответы 2

Ответы на вопрос:

Dima890438
Dima890438
4,4(75 оценок)
Var a,b,min,max,f: integer; begin readln(a,b); min: =a+b; max: =a*b; if a> b then f: =1 else f: =2; case f of 1: begin   a: =max; b: =min end;   2: begin a: =min; b: =max  end; end; writeln(a,b); end.
notmedont
notmedont
4,4(9 оценок)
Двойной выделяет строку тройной - весь текст

Популярно: Информатика