Даны 3 числа. возведите в квадрат те из них значения которых отрицательны. (записать программу на языке паскаль).

Var a,b,c: longint; begin read(a,b,c); if a< 0 then a: =sqr(a); if b< 0 then b: =sqr(b); if c< 0 then c: =sqr(c); write(a,' ',b,' ',c); end.

Var a,b,c: integer; begin readln(a,b,c); if a < 0 then a: =a*a; if b < 0 then b: =b*b; if c < 0 then c: =c*c; writeln(a,b,c); end.

Параметры моделирования: 1.       классификация текстового документа 2.       основные понятия 3.       создание текстового документа ход работы 1.       текстовый документ: обычный текст-страница, абзац, строка, слово, символ                                           таблица – строка, столбец, клетка                                           программный текст – строка , символ                                               внедренные   объекты – рисунок, электронная таблица, диаграмма, другие объекты 2.       основные понятия   и действия - строка заголовка, строка меню, стандартная панель, панель   форматирования, маркеры отступа, линейка, ползунок,   курсор, строка состояния, рабочая   область, полоса прокрутки. 3.       создание документа – запуск программы, набор текста, форматирование, печать.