ответы на вопрос: Важно ли правильно организовывать работу за компьютером? (время работы, положение компьютера и человека).
Обоснуй свое мнение, ( за ответ и 1 за обоснование)

Question

Информатика: ответы на вопрос: Важно ли правильно организовывать работу за компьютером? (время работы, положение компьютера и человека). Обоснуй свое мнение, ( за ответ и 1 за обоснование)

hahahagall · Accepted Answer

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

type
Ex211a=class

public

constructor(fio,phone:string);
begin
    var n:=Max(fio.Length,phone.Length);
    Writeln((n+2)*'*');
    Writeln('*',fio.PadRight(n),'*',NewLine,'*',phone.PadRight(n),'*');
    Writeln((n+2)*'*')
end;
end;

type
Ex211b=class

public

constructor;
begin
    var n:=ReadInteger('Введите целое число:');
    Writeln('Результат равен ',n+10)
end;
end;

begin
new Ex211a('Иван Иванов','7-841-2666666');
new Ex211b
end.

Пример

*Иван Иванов *
*7-841-2666666*

Введите целое число: 18
Результат равен 28

MOGZ ответил