Лінійні алгоритми.

1.
Куб.

program Ploshi_poverhni_kyba;

uses CRT;

Var a,S:word;

BEGIN
a:=2;
S:=6*a*a;
Writeln(S);
END.

Перевірка
Вхідні:
a-2;
Вихідні:
S-24;

Вхідні:
a-5;
Вихідні:
S-150;

Вхідні:
a-7;
Вихідні:
S-294;

2.
Добуток двох чисел.

program Dobytok dvox shisl;

uses CRT;

Var a,b,c:word;

BEGIN
a:=5;
b:=8;
c:=a*b;
Writeln(c);
END.

Перевірка
Вхідні:
a-5;
b-8;
Вихідні:
c-40;
Вхідні:
a-7;
b-3;
Вихідні:
c-21;
Вхідні:
a-4;
b-6;
Вихідні:
c-24;

3.
Периметр прямокутника.

program Plosha;

uses CRT;

Var a,b,P:real;

BEGIN
Writeln(' Vvedit dani:');
Write('Dovhuna (sm) - ');
read(a);
Write('Shuruna (sm) - ');
read(b);
P:=(a+b)*2;
Writeln('perumetr = ',P:1:2,' sm.');
END.

Перевірка
Вхідні:
Довжина(см)-2.5;
Ширина(см)-3.5;
Вихідні:
Площа(см)-12;

Вхідні:
Довжина(см)-6;
Ширина(см)-3.5
Вихідні:
Площа(см)-18.10;

Вхідні:
Довжина(см)-4;
Ширина(см)-8;
Вихідні:
Площа(см)-24;

4.
Об’єм паралелепіпеда.

program Paralelepiped;

uses CRT;

Var a,b,c,V:word;

BEGIN
V:=a*b*c;
read(a);
read(b);
read(c);
Writeln(V);
END.

Перевірка
Вхідні:
a-2;
b-3;
c-4;
Вихідні:
V-24;

Вхідні:
a-5;
b-7;
c-2;
Вихідні:
V-70;

Вхідні:
a-6;
b-8;
c-3;
Вихідні:
V-144;

5.
Площя паралелепіпеда.

program Ploshi_poverhni_paralelepipeda;

uses CRT;

Var a,b,c,S:word;

BEGIN
Read(a);
Read(b);
Read(c);
S:=2*(a*b+b*c+a*c);
Writeln(S);
END.

Перевірка
Вхідні:
a-3;
b-5;
c-8;
Вихідні:
S-158;

Вхідні:
a-5;
b-2;
c-6;
Вихідні:
S-104;

Вхідні:
a-2;
b-4;
c-9;
Вихідні:
S-124;