2.составить программу вычисления разности чисел a: =65897,7 и b: =4789,1894 3.даны стороны прямоугольника a, b. составить программу, вычисляющую площадь прямоугольника.

2)

var a, b: real;

begin

a: =65897.7;

b: =4789.1894;

a: =a-b;

writeln(a);

end.

3)

var a, b, s: integer;

begin

readln(a, b);

s: =a*b;

writeln(s);

end.

паскаль

откомпилирован: (pascal abc)

program z1; uses crt; var    n: integer;     i: integer; begin      write(' введите n :   ');       readln(n);             for i : = 1 to n do      begin                writeln(' число: ',i,' степень: ', i *i);       end; end.

си

откомпилирован: (dev cpp)

#include < stdio.h> #include < stdlib.h> #include < conio.h> #include < math.h> int main(){  int n = 0;     printf("\n vvedite n:   ");   scanf("%d", & n);   printf("\n chislo | stepen");   for(int i = 1; i < n; i++)  {                printf("\n %5d  |%5d ", i, i * i);   }  getch( );   return 0; }

часть схемы, информацию - канал.