
Penn
7 год назад
Дано целое число А. Если значение А < 0, то необходимо удвоить его. Разрабо-тать схему алгоритма для решения этой задачи. Протестировать алгоритм для A = 6, A = -10, A = 0.

ОТВЕТЫ

Kaaplamab
Jul 17, 2019
Var a:longint;
begin
read(a);
if agt;0 then
a:=a+1;
end.
begin
read(a);
if agt;0 then
a:=a+1;
end.
41
Смежные вопросы: