iloveyou27

18.04.2021 20:10

Информатика

Есть ответ 👍

Яничего не понимаю! составьте программу! арифметические действия над числами пронумерованы так: 1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление. дан номер действия n и вещественные числа a, b (b< > 0). выполнить над числами указанное действие и вывести результат. например, n=2, а=0,40, в=1,00. результат: а-в=-0,60. единицы длины пронумерованы так: 1 – дециметр, 2 – километр, 3 – метр, 4 – миллиметр, 5 – сантиметр. дан номер единицы длины и длина отрезка в этих единицах (вещественное число). найти длину отрезка в метрах.

145

191

Посмотреть ответы 3

Ответы на вопрос:

agadoraaa

Информатика

4,4(66 оценок)

{ 1 – дециметр, 2 – километр, 3 – метр, 4 – миллиметр, 5 – сантиметр.}var units: integer; value, factor: real; begin write('введите значение - '); readln(value); write('введите единицу измерения - '); readln(units); case units of 1: factor : = 0.1; 2: factor : = 1000; 3: factor : = 1; 4: factor : = 0.001; 5: factor : = 0.01; else factor : = 1; end; writeln(value * factor, ' м'); end.

20setora03

Информатика

4,5(4 оценок)

var

d: integer;

a,b: real;

begin

write('a = '); readln(a);

write('b = '); readln(b);

write('введите номер операции '); readln(d);

case d of

1: writeln(a, ' + ', b, ' = ', a + b);

2: writeln(a, ' - ', b, ' = ', a - b);

3: writeln(a, ' * ', b, ' = ', a * b);

4: begin

if b < > 0 then

writeln(a, ' / ', b, ' = ', a / b)

else

writeln('делить на 0 нельзя');

end;

else

writeln('неизвестная операция');

end;

end.

//вторая программа

var

d: integer;

a: real;

begin

write('длина отрезка = '); readln(a);

write('введите код единицы измерения '); readln(d);

case d of

1: writeln('длина отрезка ', a / 10, ' метр(а, ов)');

2: writeln('длина отрезка ', a * 1000, ' метр(а, ов)');

3: writeln('длина отрезка ', a, ' метр(а, ов)');

4: writeln('длина отрезка ', a / 1000, ' метр(а, ов)');

5: writeln('длина отрезка ', a / 100, ' метр(а, ов)');

else

writeln('неизвестная единица длины');

end;

end.

рита429

Информатика

4,6(30 оценок)

531 = 1000010011 6 нулей.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

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