Даны два числа. большее число увеличить на 3, а меньшее уменьшить на 5
Ilja0413
2
19.05.2019 18:20
0
Другие вопросы по теме Информатика
Shepinvan912
13.04.2021 14:58
Fanny321
13.04.2021 14:59
Olrg3007
31.07.2019 18:13
slavikabdulla
31.07.2019 20:10
просто346
17.12.2020 00:57
gabpara007
17.12.2020 01:04
MasterPomogite
15.09.2019 21:40
galinapetrovic
15.06.2019 02:20
KriSha11
15.06.2019 02:20
Популярные вопросы
- Чем отличаются частицы песка и глины? чем отличаются частицы песка и глины...
2 - Найти площадь круга, если радиус равен 5см...
3 - Антропогинез и теория происхождения человека...
2 - Кроссворд! вот вопросы: 1) самая интересная находка кургана №1 шиликты. (6...
1 - Выражения(3x+1)*(4x-2)-6(2x-1)^2+14...
1 - При каком значении х: а) квадрат выражения(х+1) больше квадрата выражения (...
2 - 1)здесь (на)лицо явная ошибка.-сдвинуть шапку с затылка (на)лицо.2)отказаться...
1 - Разность двух положительных чисел равна 9, а их среднее равно 6. найдите эти...
2 - Найти общее сопротивление, если r1=r2=r3=6 ом...
1 - Чем отличаются современные олимп. игры от древних греческих игр?...
3
var
a, b: real;
begin
writeln('Введите 2 числа');
readln(a, b);
if a > b then
begin
a:= a + 3;
b:= b - 5;
end;
if a < b then
begin
a:= a - 5;
b:= b + 3;
end;
writeln('a = ', a, ', b = ', b);
end.