7просмотрщик текстовых файлов. написать программу, которая позволяет просматривать текстовые файлы (выводит на экран содержимое файла имя просматриваемого файла должно вводиться с клавиатуры. вывод содержимого файла произвести постранично. примечание: результат работы с данными вывести на экран и в новый файл. файл с входными данными имеет название input.txt для текстовых файлов. на pascakabc оч нужно..

Объяснение:

Этап 1. Выявление целей инфографики

Прежде чем перейти к дизайну, выбору макета и диаграммам, обозначим цели, которые преследует наша инфографика. Иными словами, зачем мы создаем инфографику?

Речь идет не о глобальных целях вроде комплексной обработки данных или увеличения посещаемости сайта.

В данном случае решаются ясные, конкретные, реально достижимые цели коммуникации.

Найдите ключевую проблему

Вы создаете инфографику, которая принесет пользу вашей аудитории. Эта польза заключается в том, что ваша инфографика решить актуальную проблему, присутствующую в жизни вашей аудитории.

Используйте пирамиду вопросов

Пирамида вопросов сформулировать 3–5 актуальных вопросов, касающихся ключевой проблемы.

ПИРАМИДА ВОПРОСОВ:

Ключевая проблема

Главный вопрос, на который дает ответ инфографика.

2–3 вс вопроса

Вопросы, раскрывающие проблему (что, как).

1–2 уточняющих вопроса

Вопросы для анализа

Program chik; const n=15; var p: array[1..15]of real; i: integer; s: real; begin s: =0; for i: =1 to n do begin read(p[i]); if(i mod 2=0)and(p[i]< 0)then s: =s+p[i]; end; writeln(s); end.2)program gt; uses crt,graphabc; const n=7; var mac1,mac2,mac3: array[1..15]of real; i,k1,k2: integer; begink1: =0; k2: =0; for i: =1 to n dobeginread(mac1[i]); if(mac1[i]> 0)then begininc(k1); mac2[k1]: =mac1[i]; end; if(mac1[i]< 0)then begininc(k2); mac3[k2]: =mac1[i]; end; end; for i: =1 to n dowrite(mac1[i],' '); writeln; for i: =1 to k1 dowrite(mac2[i],' '); writeln; for i: =1 to k2 dowrite(mac3[i],' '); end.