Даны числа a и b вычислить сумму и утроенное произведение (информатика паскаль

ответ:

program n1;

var s,p,a,b: real;

begin

readln(a,b);

s: =a+b;

p: =3*(a+b);

writeln('сумма чисел а и b равна ', s);

writeln('утроенное произведение a и b равно ' ,p);

end.

объяснение:

после слов "равна" и "равно" обязателен !

просто попробуй в pascal abc проверить что учу я на информатике:

program n1;

uses graphabc;

var x,y: integer;

begin

setpenwidth(3);

line (100,300,300,300);

line(100,300,150,200);

setpenstyle(psdash);

line(150,200,350,200);

setpenstyle(pssolid);

line(350,200,300,300);

line(250,50,150,200);

line(250,50,100,300);

line(250,50,350,200);

line(250,50,300,300);

end.

vara,b: integer; c: real; beginwriteln ('1'); read (a); writeln ('2'); read (b); c: =(a/1)/(1/b); writeln (c); end.

program xxx;

      var d, x1, x2, y1,y2 : real;

begin

  write('введите координаты 1 точки: ');

  readln(x1, y1);

  write('введите координаты 2 точки: ');

  readln(x2, y2);

  d: =sqrt(sqr(x2-x1)+sqr(y2-y1));

  write('растояние между точками =', d);

  readln

end.