Pascal урок 5

7. Вам нужно получить от пользователя два вещественных числа и ещё два целых, запишите все эти 4 значения в переменные и выведете значения переменных на экран, чтобы было ясно значение какой переменной чему равно.

var a, b: integer;
     c, d: real;
begin
   WriteLn('enter value a ');
      readln(a);
   WriteLn('enter value b ');
      readln(b);
   WriteLn('enter value c ');
      readln(c);
   WriteLn('enter value d ');
      readln(d);
   writeln(' a= ', a, ' b= ', b,' c= ', c, ' d= ', d);
end.

8.Получите от пользователя целое значение, умножьте его на значение вещественной переменной (присвойте ей его явно в коде), результат произведения запишите в третью переменную и выведете её значение на экран.

  

var a: integer;
      b, c: real;
begin
        b := 3.5;
  writeLn('enter value a ');
    ReadLn(a);
       c:= a*b;
  writeln(' c= ', c);
end.
 

9.Получите от пользователя значений трех чисел -- два целых и одно вещественное и выведите на экран значение их суммы.

var  a, b: integer;
       c, d: real;
begin
  writeLn('enter value a ');
     readln(a);
  writeLn('enter value b ');
     readln(b);
  writeLn('enter value c ');
     readln(c);
         d := a + b + c;
  writeln('sum of numbers = ', d);
end.