Даны два числа a и b. удвоить меньшее из них.

Veta1986 Veta1986    3   24.08.2019 21:40    1

Ответы
vilkinakarina vilkinakarina  05.10.2020 17:26
Var
a, b, k : integer;
begin
writeln ('text');
readln (a);
writeln ('text1');
readln (b);
if (a>b) then
k:=b*2
else
k:=a*2;
writeln (k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика