Перевести число 10000001 из двоичной системы в систему с основанием 8,10,6
215
300
Ответы на вопрос:
Program fareng;
Var
x,y:real;
Begin
Writeln('Введите в градусах Цельсия');
read(x);
y:=1.8*x+32;
WriteLn('В Фаренгейтах это = ',y:1:2);
end.
Пояснення:
Название програми
Оглашение переменных
----
Начало програми
Вывод на экран фрази "Введите в градусах Цельсия"
Ввод с клавиатуры значения переменной х
Присвоение переменной у значение градусов Фаренгейта
Вывод на экран "В Фаренгейтах это = " и значения переменной у с 2 знаками после запятой
Конец програми.
Популярно: Информатика
-
nastyalisi4ka111.06.2023 09:11
-
victoriya020503.02.2020 01:08
-
ЕнотикPRo25.04.2021 19:22
-
viktoriasmirnova20011.05.2023 12:20
-
uchenik198826.07.2021 17:07
-
рома134421.08.2021 22:06
-
svdanilova06.09.2022 13:50
-
astrapolina17.08.2020 20:27
-
Rianariana200223.01.2023 22:12
-
снегурочка0112.06.2021 22:25