Начертите , как будет выглядеть таблица после заполнения ее необходимыми записями.
ПОМОГИТЕ ПРОШУ
187
188
Ответы на вопрос:
var
a,b : real;
begin
readln(a,b);
if a >= b then
begin
a := a * 2;
b := b * 2;
end
else
begin
a := abs(a);
b:= abs(b);
end;
writeln(a:5:2,b:5:2);
end.
Популярно: Информатика
-
Buivid104.04.2022 20:46
-
Yasmin1111116.12.2022 20:28
-
Deniska777109.05.2021 06:23
-
Homoeopath01.04.2021 04:09
-
ARDASHEV201920.07.2022 04:19
-
KoteikaOneLove07.09.2020 05:43
-
mick6514.06.2020 02:38
-
privetjakot27.03.2022 19:55
-
gamlet200809.12.2022 07:41
-
lololoki0302.05.2022 18:58