даны числа 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.