1 комментарий для “С информатикой. 7 класс. Turbo Pascal Задача 1: Составить программу, которая преобразует введённое с клавиатуры дробное число в денежный формат (12. 5”
1) var a: real; x, y: integer; begin writeln(‘Введите дробное число’); readln(a); x:= trunc(a); y:= frac(a); writeln(x, ‘ рублей ‘, y * 100, ‘ копеек’); readln; end. 2) var n: 100..999; a, b, c: 0..9; //a — сотни, b — десятки, с — единицы begin writeln(‘Введите трехзначное число’); readln(n); a:= n div 100; b:= (n mod 100) div 10; c:= n mod 10; writeln(‘Сумма цифр: ‘, a + b + c); readln; end. 3) var a, b, c: real; begin writeln(‘Введите числа а и b’); readln(a, b); if a > b then begin c:= a; writeln(c, ‘ — большее число’); end; if b > a then begin c:= b; writeln(c, ‘ — большее число’); end; if b = a then writeln(‘Числа равны’); readln; end.
Источник: znanija-club.com
Уроки на языке Pascal. Урок 21. Рекурсия.
Написать программу которая преобразует введенное с клавиатуры дробное число в денежный формат pascal
Составить программу, которая преобразует введённое с клавиатуры дробное число в денежный формат например 27,5 — 25 руб 50 коп
паскаль.
77 
Комментарии (0)
По дате По дате Популярные
Нет комментарий
Войдите, чтобы комментировать
Ответов нет
Знаешь ответ? Добавь его сюда и заработай денег! Ответы проходят модерацию. Минимум 100 символов.
Чтобы добавить ответ — нужно войти или зарегистрироваться
Похожие вопросы
(Ольга ученик ) (Информатика)
1
(Ольга ученик ) (Информатика)
(Ольга ученик ) (Информатика)
(Ольга ученик ) (Информатика)
1
(Андрей ученик ) (Информатика)
2
Популярное
(Женя Бурцев ученик ) (Математика)
3
(Анфим Гущин ученик ) (История)
2
(Рина Русакова ученик ) (Алгебра)
3
(Прокопий Герасимов ученик ) (Литература)
3
(Варвара Кузнецова ученик ) (Литература)
Среда программирования Pascal ABC (6 класс)
(Венедикт Федотов ученик ) (Математика)
1
(Дебора Русакова ученик ) (Физика)
2
Источник: teachs.ru
Среда программирования Pascal ABC. Ввод и вывод данных. Томский государственный университеет систем управления и радиоэлектроники
Единственный в мире Музей Смайликов
Самая яркая достопримечательность Крыма
Скачать 25.27 Kb.
Федеральное государственное бюджетное образовательное учреждение высшего образования
«ТОМСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕЕТ СИСТЕМ УПРАВЛЕНИЯ И РАДИОЭЛЕКТРОНИКИ»
Кафедра физической электроники (ФЭ)
Среда программирования Pascal ABC. Ввод и вывод данных
Практическая работа №4 по дисциплине Информатика
кафедры
___________
Томск 2021
Задание 1.
9. Написать программу вычисления площади треугольника, если известна длина основания и высота.
Решение
var
writeln(‘Вычисление площади треугольника.’);
writeln(‘Введите основание и высоту через пробел’);
write(‘Площадь треугольника ‘,s,’ кв. см.’);
Вычисление площади треугольника.
Введите основание и высоту через пробел
Площадь треугольника 42.5 кв. см.
Задание 2.
19. Написать программу пересчета величины временного интервала, заданного в минутах, в величину, выраженную в часах и минутах.
Решение
var
writeln (‘Пересчет величины временного интервала’);
writeln (‘Введите величину временного интервала (в минутах) и нажмите ‘);
b:=a div 60;
c:=a mod 60;
write (a,’ мин. — это ‘,b,’ ч. ‘,c,’ мин.’);
Пересчет величины временного интервала
Введите величину временного интервала (в минутах) и нажмите
150 мин. — это 2 ч. 30 мин.
Задание 3.
20. Написать программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. Например, число 125 должно быть преобразовано к виду 12 руб. 50 коп.
Решение
writeln (‘Преобразование числа в денежный формат.’);
writeln (‘Введите дробное число’);
writeln (a,’ руб.- ‘,’это ‘,b,’ руб.’,c,’ коп.’);
Преобразование числа в денежный формат.
Введите дробное число
23.6 руб.- это 23 руб.60 коп.
Источник: topuch.com