По рисунку на верху страницы 13 учебника составь алгоритм тропинка к сосне
Ответы на вопрос:
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.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
софьячубик10.01.2021 15:44
-
снежана18331.05.2021 09:46
-
olga63822.08.2021 07:46
-
kirill88017.07.2021 06:24
-
S1nneR6707.04.2022 05:15
-
ЦилиндрПушкина30.05.2023 02:52
-
оксана73130.11.2022 17:13
-
милана20022918.04.2021 09:13
-
Змей2429.05.2022 15:27
-
Ekaterina7394807.03.2022 19:31
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.