Домашняя работа на 15 февраля. В тетрадь или сфотографировать

 Пример 1Наберите программу для задачи b=7a, введите значения величины А

// фам 1
var   a,b:integer;
   begin
   writeln('введите а');
read(a);
     b:=;
     writeln('результат=',b) ;    end.
 
Пример 2 Наберите программу для задачи b=8a+9a, введите значения величины a
// фам 2
var   a,b:integer;
   begin
   writeln('введите а'); read(a);
       b:=a__+a__;
     writeln('результат=',b) ;    end.
 
Пример 3 Наберите программу для задачи b=7a:3a, введите значения величины А
// фам 3
var   a,b:integer;
begin
writeln('введите а'); read(a);
b:=;
writeln('результат=',b) ;end.
 
Пример 4 Дана сторона квадрата, найти его периметр.
// фам 4
var   a,Р:integer;
   begin
writeln('введите а');     read(a);
     Р:=_______;
     writeln('результат=',P) ;    end.
 

Пример 6

Даны 3 числа. Найти их сумму, разность и умножение