Есть ответ 👍

с VBA (Практикум по VBA для Microsoft Excel Ширева С. Н. ) 2 лабораторная работа
Создать макрос итог, к тором для созданной таблицы выполнить форматирование:
1. Для столбцов выполнить автоподбор ширины.
2. Выполнить обрамление таблицы.
3. Для шапки выполнить заливку и задать полужирный шрифт.
4. для строки над таблицей задать объединение ячеек и центрирование по вертикали и по горизонтали.
5. Для последнего столбца задать денежный формат.
6. Под последней колонкой поместить функцию суммирования и выделить ее жирным шрифтом.. 7. Объединить ячейки перед суммой на написать туда слово ИТОГО жирным шрифтом.

219
233
Посмотреть ответы 2

Ответы на вопрос:


1,6,7 варианты ответа

miku1368
4,8(82 оценок)

===== PascalABC.NET =====

begin

   var a := ReadReal('Задайте a - сторону квадрата:') / 2;

   var (x, y) := ReadReal2('Задайте координаты точки:');

   if (Abs(x) >= -a) and (Abs(y) <= a) then

     Print('Точка принадлежит квадрату')

   else

     Print('Точка не принадлежит квадрату')

end.

Популярно: Информатика