Код программы:
var a:integer;
begin
write('Введите возраст автовладельца: ');
readln(a);
if (a > 40) then begin
writeln('Выберите место эксплуатации:');
writeln('1. Город');
writeln('2. Сельская местность');
readln(a);
if (a = 1) then begin
write('Введите стаж: ');
readln(a);
if (a > 10) then
writeln('Страховать')
else
writeln('Не страховать')
end
else
writeln('Страховать')
end
else begin
writeln('Езда без аварий?');
writeln('1. Да');
writeln('2. Нет');
readln(a);
if (a = 1) then
writeln('Страховать')
else begin
writeln('Выберите тип автомобиля:');
writeln('1. Минивэн');
writeln('2. Спорткар');
readln(a);
if (a = 1) then
writeln('Страховать')
else
writeln('Не страховать')
end;
end;
end.
Поделитесь своими знаниями, ответьте на вопрос:
сделать задачку в паскале Месячная выплата m по займу в s рублей на n лет под процент p вычисляется по формуле: m=(s*r*(1+r) в n степени / (12*((1+r) в n степени -1)), где r=p/100 Необходимо рассчитать месячную выплату по займу и прибыль банка. Выражение exp(In(1+r)*n) вычисляет (1+r) в n степени. Выражение trunc(100*m+0.5)/100 выполняет округление до копейки. Данные для самопроверки: Величина заема: 200000 Процент: 14.5 Количество лет: 6 Месячная выплата равна: 4344.8 Прибыль банка: 112825.5
№1
1) Устройство вывода
2) Процессор
№2
1) Клавиатуры
2) Принтере
№3
Устройства ввода: клавиатура
Устройства вывода: монитор, наушники, принтер
№4
1) Веб-камера
2) Проектор
Объяснение:
№5
Операционная система изображена на первой картинке (Windows 7)
№6
1) Управление устройствами компьютера (ресурсами)
2) Ведение файловой структуры.
3) Пользовательский интерфейс, т.е. диалог с пользователем.
№7
Не могу разобрать сообщение (низкое качество фотографии)
№8
Wi-Fi
Bluetooth
USB
№9
Мобильность (удобство в использовании)
Легкость создания и расширения сети
№10
ИК-порт: телефон - компьютер
Bluetooth: беспроводные наушники\колонка - телефон