Question

Помогите пожалуйста это информатика, задачи на фото Буду благодарна

Answer 1

2)var  a,b:integer;begin  writeln('Введите значение a: ');  readln(a);  writeln('Введите значение b: ');  readln(b);  if a>b then  begin  writeln('a-b= ',a-b);  end  else  if b>a then  writeln('b-a= ',b-a);  end.
3)var  a:integer;beginfor a:=1 to 3 dobegin  writeln('Hello');end;end.