На вход программе подаются целые числа x и y,необходимо уменьшить на 100 то числ...

July 2022 1 1 Report

На вход программе подаются целые числа x и y,необходимо уменьшить на 100 то число которое является трехзначным.И увеличить в 10 раз то число которое является меньше ста

Answers & Comments

Студэнt //PascalABC.Net 3.2
begin
var x:=readinteger('Введите x: ');
var y:=readinteger('Введите y: ');
if x in [100..999] then writeln ('x=', x-100) else writeln ('x=', 10*x);
if y in [100..999] then writeln ('y=', y-100) else writeln ('y=', 10*y);
end.

1 votes Thanks 0

Answers & Comments

dar treugolnik so stranami 4sm6sm i 8sm

vvesti chisloesli ono chetnoe razdelit ego na 4esli nechetnoe trudnost na 5

napisat programmu kotoraya opredelit summu vseh cifr pyatiznachnogo chisla xvvodyat

reshite pozhalujsta slozhnost 8 klassa srochno

napisat programmu kotoraya summu vseh cifr pyatiznachnogo chisla h kotoryj vvoditsya

na vhod programme podayutsya celye chisla x i yneobhodimo umenshit na 100 to chisl77f6bbe9d65a502a617e9670a2d0968b 22212

dano trehznachnoe chislo verno li chto summa ego cifer bolshe 10 slozhnost 8 klas

рекомендуемые вопросы

Helpful Links

Helpful Social