AbashkinaEvgenia98
16.01.2023 00:37

Задание: 1. Создать блокнот из 5 – 7 записей: наименование страхового полиса, год окончания действия, страховая сумма.
2. Написать программу, которая:
• выводит на экран содержимое файла
• определить наименование полиса с самой большой страховой суммой
• создает новый файл: список полисов, срок действия которых заканчивается в указанном году (предусмотреть вариант отсутствия данных)
• выводит на экран содержимое нового файла
3.В программе использовать хотя бы одну обработку исключений при работе с файлом.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
dmitrosevchuk
13.04.2023 20:09
Var  a,b,p,n,x,i:integer;
begin
writeln('Сколько примеров будешь решать:');
readln(n);
for i:=1 to n do
  begin
  a:=random(10)+1;
  b:=random(10)+1;
  write('Сколько будет ',a,'+',b,'=');
  readln(x);
  if x=a+b then
    begin
    p:=p+1;
    writeln('Правильно');
    end
    else writeln('Неверно');
  end;
writeln('Число правильных ответов: ',p);
if p=n then writeln('Отлично, ты превосходно знаешь арифметику');
if (p<n) and (p/n>0.75) then writeln('Хорошо, ты неплохо знаешь арифметику');
if (p/n<=0.75) and (p/n>0.5) then writeln('Удовлетворительно, ты средне знаешь арифметику');
if (p/n<=0.5) and (p>0) then writeln('Плохо, ты не знаешь арифметику');
if p=0 then writeln('Отвратительно, ты абслютно не знаешь арифметику');
end.

Можно сделать, чтобы не только на сложение, а на все 4 действия.
0,0(0 оценок)
Ответ:
bumar2
15.05.2022 13:19
Для того чтобы посмотреть содержимое страницы, заблокированной в нашей стране, используйте сайт-прокси? Да Для каждого спецсимвола, будь то кавычки «ёлочкой» или длинное тире, существует цифровая комбинация, которую нужно запомнить? да Чтобы изменить разрешение экрана монитора на Windows нужно войти во вкладку управления экраном панели управления, выбрать новое разрешение и нажать ОК? Да отправить фотку или файл по скайпу Нужно нажать правой кнопкой на получателя, выбрать «отправить файл», затем найти фото на вашем компьютере и нажать «Открыть». Передача файла начнётся и принимающей стороне нужно будет подтвердить приём файла.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота