Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Дописать фрагмент программы, чтобы получить ответ, чему равно значение а и b?
a:=10;
b:=15;
if a>b
then b:=a+b;
a:=a+b
(Допишите начало и конец) пожалуйста очень срочно нужно!!!!

Ответ оставил Гость

var a,b:integer; 
begin

a:=10;
b:=15;
if a>b  then b:=a+b;
a:=a+b;

writeln(a);

writeln(b);

end;