ответ:Прикола с двумя числами не понял, если по итогу второе число не применяют!
var a,b,c:int64;
begin
readln(a);
b:=a mod 2;
if b = 0 then c:=a*2
else c:=a*4;
writeln('Итоговое число: ',c);
end.
ответ:Прикола с двумя числами не понял, если по итогу второе число не применяют!
var a,b,c:int64;
begin
readln(a);
b:=a mod 2;
if b = 0 then c:=a*2
else c:=a*4;
writeln('Итоговое число: ',c);
end.