М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Niker04
Niker04
23.01.2022 02:27 •  Информатика

)) 2. написать программу на языке программирования паскаль, вычисляющую гипотенузу и площадь прямоугольного треугольника по двум данным катетам.

👇
Ответ:
vasviktor
vasviktor
23.01.2022
Var a, b, c, s: real;
begin
    write('Введите a, b: '); readln(a, b);
    c := sqrt(a*a + b*b);
    s := (a * b) / 2;
    writeln('Гипотенуза: ', c, #10, 'Площадь: ', s);
end.
4,8(7 оценок)
Открыть все ответы
Ответ:
fantomfantoms
fantomfantoms
23.01.2022

Довгий час знання, яких набувала людина протягом життя, передавались усно від покоління до покоління, що не забезпечувало безперервного поповнення бази знань людства в цілому. Безперервний процес збереження інформації забезпечила писемність, яка дозволяла накопичувати інформацію.

Спочатку люди викарбовували написи на камінні, потім видавлювали гострими паличками на глиняних дощечках. Писали паличками на папірусі, пензликами на шовку і перами на папері. Гусяче перо змінили ручки з металевим пером, а їх – графітові олівці, авторучки, а згодом друкарські машини.

Проте в роботі з текстами залишалося незмінним головне: щоб внести зміни в текст, його потрібно було щоразу переписувати або передруковувати. І лише застосування комп'ютерів і спеціальних програм принципово змінило технологію роботи з текстом. У чому ж полягають переваги у використанні ПК для обробки текстів?

Для роботи з текстом на ПК використовують: текстові редактори, текстові процесори та видавничі системи. У загальному їх називають системами обробки текстів – програми, які призначені для створення, редагування й друку текстових документів.

Текстовий редактор – це програма, що дозволяє вводити, редагувати, форматувати та зберігати текст.

Текстовий процесор – це програма, що дозволяє вводити, редагувати й форматувати текст, вставляти малюнки й таблиці, перевіряти правопис, складати зміст, виконувати перенос слів та багато інших складних операцій.

Настільна видавнича система (НВС) – це програма, за до якої можна створювати високоякісні оригінал-макети, що містять текст і графічні зображення для тиражування в друкарні.

Наприклад:

•    текстові редактори (Multi-Edit, Блокнот, WordPad, Твір, Лексикон);

•    текстові процесори (Microsoft Word, Word Prefect, OpenOffice, Word-Star);

•    настільні видавничі системи (Adobe PageMaker, Corel Ventura, Publisher, QuarkXPress).

Вивчаючи в 9-му класі роботу з текстовим процесором Word 2003, ви вже навчилися створювати текстові документи, редагувати і форматувати текст, вставляти в документ і форматувати векторні графічні зображення. Однак користувач майже завжди передбачає, що створений ним документ буде надрукований. Тому важливо оформити документ так, щоб він гарно виглядав не тільки на екрані, але й на аркуші паперу.

Объяснение:

4,5(44 оценок)
Ответ:
Карапиди
Карапиди
23.01.2022
var i: integer; begin // С С С Вывод последовательности 1 3 5 7 9var i,x: integer; begin // С и промежуточной переменной x := 1; for i := 1 to 5 do begin write(x,' '); x := x + 2; end; writeln;   // С без промежуточной переменной for i := 1 to 5 do write(2*i-1,' '); writeln;   // С С Сумма и произведение введенных чиселКод на Pascalvar i: integer; s,p: real; x: real; begin writeln('Введите 10 чисел: '); s := 0; p := 1; for i := 1 to 10 do begin read(x); s := s + x; p := p * x; end; writeln('Сумма введенных чисел = ',s); writeln('Произведение введенных чисел = ',p); end.Код на PascalABC.NETvar s,p: real; begin writeln('Введите 10 чисел: '); s := 0; p := 1; for var i := 1 to 10 do begin var x: integer; read(x); s += x; p *= x; end; writeln('Сумма введенных чисел = ',s); writeln('Произведение введенных чисел = ',p); end.Вычисление n!Код на Pascalvar n,fact: integer; i: integer; begin write('Введите n (n<=13): '); readln(n); fact := 1; for i := 2 to n do fact := fact * i; writeln(n,'! = ',fact); end.Код на PascalABC.NETvar n: integer; begin write('Введите n (n<=13): '); readln(n); var fact := 1; for var i := 2 to n do fact *= i; writeln(n,'! = ',fact); end.Вычисление AnКод на Pascalvar n,i: integer; a,p: real; begin write('Введите a,n: '); readln(a,n); p := 1; for i := 1 to n do p := p * a; writeln(a,' в степени ',n,' = ',p); end.Код на PascalABC.NETvar n: integer; a: real; begin write('Введите a,n: '); readln(a,n); var p := 1.0; for var i := 1 to n do p *= a; writelnFormat('{0} в степени {1} = {2}',a,n,p); end.
4,7(95 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ