0.00 3. Відкрийте вказаний учителем/учителькою файл (наприклад, Розділ 3\Пункт 3
зразок 3.4.3.xlsx). Установіть на аркуші Аркуші такі формати числових даних.
а) у стовпці А - Числовий з двома десятковими розрядами,
б) у стовпці В- Грошовий з двома десятковими розрядами та знаком євро після
в) у стовпці С- Довгий формат дати;
г) у стовпці D – Відсотковий;
д) у стовпці E- Текстовий.
числа;
283
464
Ответы на вопрос:
Pascal: program project; var a,b,c: integer; min, max: integer; begin write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); if (a> b) and (a> c) then begin max: =a; if b> c then begin a: =c; c: =max; end else begin a: =b; b: =max; end end else begin if (b> a) and (b> c) then begin max: =b; if a> c then begin b: =c; c: =max; end else begin b: =a; a: =max; end end else begin max: =c; if a> b then begin c: =b; b: =max; end else begin c: =a; a: =max; end end end; write('a=',a); write('b=',b); write('c=',c) end.
Популярно: Информатика
-
pashasergo24.04.2022 19:56
-
dsgdfsg0004.08.2020 22:38
-
амонра221.02.2022 21:10
-
Qwertyuiopkoval02.05.2023 04:27
-
Gesha1129.03.2022 15:31
-
saulefazylovnap00xfc16.04.2021 21:59
-
АлексаФокс31.07.2021 01:59
-
TheSniper13.05.2021 22:26
-
yaam1323.07.2021 06:50
-
oled2323.10.2022 01:50