Напишите программу которая принимает с клавиатуры целое число часов и выводит на экран! ​

type cl = class

  a: integer;

  constructor create(b: integer);

  procedure setval(b: integer);

  function getval: integer;

  procedure sq;

end;

constructor cl.create(b: integer);

begin

  a : = b;

end;

procedure cl.setval(b: integer);

begin

  a : = b;

end;

function cl.getval: integer;

begin

  getval : = a;

end;

procedure cl.sq;

begin

  if a < 0 then

    writeln('a ^ 2 = ', a * a)

  else

    writeln('error');

end;

var

  obj: cl;

  a : integer;

begin

  write('a = ');

  readln(a);

  obj : = cl.create(a);

  obj.sq;

  readln;

  obj.destroy;

end.

#include <iostream>

#include <cmath>

#include <vector>

using namespace std;

signed main() {

   const int t_cost = 10,d_cost = 50;

   int k_am,l_am,d_am;

   cout << "Введите количество тетрадей в клетку: ";

   cin >> k_am;

   cout << "Введите количество тетрадей в линейку: ";

   cin >> l_am;

   cout << "Введите количество дневников: ";

   cin >> d_am;

   cout << "Общая стоимость покупки: " << t_cost * k_am + t_cost * l_am + d_cost * d_am << " руб.";

}

Объяснение:

Локальные сети – позволяют связать станции на расстоянии не более 15 км. Таким соединяют чаще всего или единственное здание или несколько соседствующих.

Региональные сети – протяженность которых составляет от 10 до 100 км. Региональной сетью может быть как город, так и целый район.

Глобальные сети – обеспечивают соединения более 1000 км. Они объединяют области и даже страны. Самой известной такой сетью, разумеется, является интернет.

Рассматривать региональные сети в данной статье нет необходимости, так как о них много будет сказано на выставке Экспоцентра «Связь», а здесь будет представлена информация о том, что представляют собой локальные и глобальные компьютерные сети.

Локальная вычислительная сеть

ЛВС пользуются большой популярностью в экономической сфере, позволяя объединять станции работников офиса.

Для достижения одной и той же цели используются разные схемы соединения, такие как шина, кольцо и звезда. Шина представляет схему, при которой существует единый центральный канал, и уже к нему подсоединяются все пользователи. Связь осуществляется между всеми компьютерами сети.

Такая схема радует низкой стоимостью подключения и надежностью. В случае неисправности одной из станций сети это никак не скажется на работо остальных.