Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Определить номер столбца матрицы Дана матрица А с размерностью 5х5. Определить номер её столбца с наибольшим произведением элементов, вывести этот номер, а также значение наибольшего произведения. https://www.cyberforum.ru/ pascal/ thread185828.html	Pascal Два целочисленных массива Даны два целочисленных массива. Выписать те значения массива А, которых нет в В.
Pascal Написать функцию, которая находит гиперболический синус и реализуется формулой Написать функцию, которая находит гиперболический синус и реализуется формулой: https://www.cyberforum.ru/ pascal/ thread185822.html	Pascal Создание модуля https://www.cyberforum.ru/ pascal/ thread185805.html помогите сделать задачу с помощью создание модуля вот сама задачка: uses crt; var n,o,i:integer; function fib (n:byte):longint; begin if (n=1) or (n=2) then fib:=1 else fib:=fib(n-1)+fib(n-2); end; begin read(n);
Pascal Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен последнему символу соответствующей строки. Дан массив В из N строк произвольной длины.Сформировать массив В,каждый элемент которого равен последнему символу соответствующей строки.Помогите,пожалуйста)	Pascal Простые делители заданного натур. числа Попогите переделать программу. Вывести на экран все простые делители заданного натурального числа. Вод мой код: uses crt; var i,j,m,n,k:integer; begin writeln('Введите натур число'); readln(n); writeln('Простые делители данного числа'); https://www.cyberforum.ru/ pascal/ thread185766.html
Pascal Вычислить сумму членов бесконечного ряда с заданной точностью Вычислить сумму членов бесконечного ряда с заданной точностью: eps = 0,5*10^-4 при x = 0,10. На экран вывести значение суммы, число членов ряда, вошедших в сумму, и последний член ряда, вошедший в сумму. Отдельные члены ряда высчитываются правильно, да и сумма членов ряда вроде бы тоже правильно считается. program one; https://www.cyberforum.ru/ pascal/ thread185754.html	Блок-схема Pascal Здраствуйте.... Извините за такую просьбу ну кто сможет нарисовать блок схему этого большого кода..... или есть какие нибудь программы которые поддерживают код больее 30-50 символов а то времени мало а у меня курсовая еще есть..... unit stud; interface uses crt; const n=10; type TStud=record fio:string; ocn:array of byte; srb:real;
Pascal Найти все повторяющиеся элементы в массиве, предшествующие последнему отрицательному https://www.cyberforum.ru/ pascal/ thread185719.html Ввести одномерный массив A, вывести его. Найти все повторяющиеся элементы в нём, предшествующие последнему отрицательному.	Pascal Образуют ли 3 точки треугольник Ввести числа x1,y1,x2,y2,x3,y3 которые являются значениями координат трех точек на "плоскости." Определить, образуют ли они треугольник (точки не лежат на одной прямой), если образуют, то определить, лежит ли он в первой четверти координат или нет, и выдать об этом "сообщение." https://www.cyberforum.ru/ pascal/ thread185718.html
Подсчитать количество четных чисел Pascal Помогите пожалуйста решить задачи	Pascal работа с интернетом https://www.cyberforum.ru/ pascal/ thread185691.html Всем привет! Изучал pascal полгода, но так и не нашел в учебниках, где рассказывается о работе с интернетом. (отправка GET & POST запросов, работа с браузером) Посоветуйте пожалуйста какие-нибудь статьи или учебники на эту тему. Спасибо! Добавлено через 4 часа 28 минут Ребят, помоги плиз, срочно нужно

pryda

Неадекват и грубиян

310 / 297 / 301

Регистрация: 22.02.2010

Сообщений: 647

03.11.2010, 19:17

Увеличение оклада - Pascal - Ответ 1081702

03.11.2010, 19:17. Показов 1526. Ответов 1

Метки (Все метки)

Сообщение было отмечено Наталья_87 как решение

Решение

накидал по-быстрому. необходимый функционал добавите сами:

Pascal

type    workers=record
    fio,dl:string;
    oklad:real;
    end;
    f=file of workers;
var     rab:workers;
    i,n:integer;
    d:string;
    f1:f;
begin
assign(f1,'data.txt');
rewrite(f1);
writeln('Введите количество записей');
readln(n);
for i:=1 to n do
begin
    writeln('Работник ',i);
    write('Введите ФИО: '); readln(rab.fio);
    write('Введите должность: '); readln(rab.dl);
    write('Введите оклад: '); readln(rab.oklad);
    write(f1,rab);
end;
reset(f1);
writeln('Введите должность для увеличения оклада');
readln(d);
while not eof(f1) do
begin
    read(f1,rab);
    if rab.dl=d then
    begin
        rab.oklad:=rab.oklad+rab.oklad/10;
        writeln(rab.fio,' ',rab.dl,' ',rab.oklad:7:2);
    end;
end;
close(f1);
end.

Вернуться к обсуждению:
Увеличение оклада Pascal

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

03.11.2010, 19:17

Готовые ответы и решения:

Написать программу, которая должна начислить премию работникам в размере оклада, стаж которых превышает Х лет
Создать массив записей, содержащий сведения о сотрудниках института. Каждая запись содержит поля -...

Записать строки в файл в порядке убывания оклада служащего
На вход программы подается натуральное число N, не превосходящее 100,а за ним N строк следующей...

Напечатать список работников предприятия с указанием стажа их работы и оклада, а также итоговую сумму их окладов.
Напечатать список работников предприятия с указанием стажа их работы и оклада, а также итоговую...

Определите тарифные ставки оклада работников
Известно, что тарифная ставка оклада работника 5 разряда равна минимальной заработной плате....

	03.11.2010, 19:17

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

03.11.2010, 19:17

Помогаю со студенческими работами здесь

Ввод списка служащих и окладов. Сортировка записей и увеличение оклада на N рублей
Имеется список служащих и их окладов. Составить программу, которая обеспечивает ввод этих данных в...

Отбор оклада в 7.7
вот и снова задачка от 7.7. есть такое условие как исполнить не представляю точнее визуально...

Расчет оклада сотрудников
Доброго времени суток! Есть БД "интернет-магазин". Есть таблица "Сотрудники", в которой имеется...

Лабораторная, расчет оклада
Очень нужна помогите 1. Запустите программу Microsoft Excel. 2. Создайте новую книгу. 3....

Новые блоги и статьи
Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .	Полезные поделки на Arduino, которые можно сделать самому raxper 06.01.2025 Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .	Подборка решений задач на Python IT_Exp 06.01.2025 Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллеры raxper 06.01.2025 Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .	Из чего собрать игровой компьютер inter-admin 06.01.2025 Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .	Обновление сайта www.historian.by Reglage 05.01.2025 Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .	Как использовать GraphQL в C# с HotChocolate Programming 05.01.2025 GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .	Модель полного двоичного сумматора с помощью логических операций (python) AlexSky-coder 04.01.2025 def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()	Это мы не проходили, это нам не задавали...(асихронный счётчик с управляющим сигналом зад Hrethgir 04.01.2025 Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .

Наверх