Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
0 / 0 / 0
Регистрация: 03.05.2011
Сообщений: 39
1

Температура воздуха задана за шкалой Фаренгейта.Вывести её значение за шкалой Цельсия.

17.09.2012, 19:45. Показов 1834. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Температура воздуха задана за шкалой Фаренгейта.Вывести её значение за шкалой Цельсия.(За шкалой Фаренгейта температуре плавления льда отвечает 32F, а температуре кипения воды - 212F).
ответ нужен сегодня в срочном порядке!!!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.09.2012, 19:45
Ответы с готовыми решениями:

Вывести линейку со шкалой
Одним из потрясающих аттракционов на этой ярмарке должна стать стенка с нарисованной на ней...

Показометр с линейной шкалой
Езжу на УАЗ-3162, а него фишка :из ЛЕВОГО бака бензин перекачивается в Правый и уже оттуда на...

Найти вероятность того, что температура воздуха в сауне будет от 100 до 125 градусов Цельсия
Математическое ожидание нормально распределенной случайной величины – температура воздуха в ...

Полоса прокрутки с логарифмической шкалой
Помогите пожалуйста грамотно написать универсальную формулу для управления точки на графике с...

4
Фрилансер
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,587
Записей в блоге: 1
17.09.2012, 19:49 2
Pascal
1
2
3
4
5
6
Var tm:real;
Begin
    write('Введите температуру по фаренгейту: ');readln(tm);
    writeln('Температура по цельсию: ',9/5+32:0:2);
    readln;
End.
1
0 / 0 / 0
Регистрация: 03.05.2011
Сообщений: 39
17.09.2012, 20:39  [ТС] 3
спасибо огромное
0
10 / 10 / 3
Регистрация: 17.09.2012
Сообщений: 65
17.09.2012, 20:55 4
Прикалываетесь что ли???

Добавлено через 6 минут
Вот правильный код

Pascal
1
2
3
4
5
6
7
8
9
Var
 t1,t2:real;
Begin
 writeln('Ââåäèòå òåìïåðàòóðó ïî ôàðåíãåéòó: ');
 readln(t1);
 t2:=(t1-32)*(5/9);
 writeln('Òåìïåðàòóðà ïî öåëüñèþ: ',t2:0:2);
 readln;
End.
0
Фрилансер
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,587
Записей в блоге: 1
17.09.2012, 21:04 5
KIKIMIKI, действительно не правильно взял перевод с какого то сайта...

Добавлено через 3 минуты
Pascal
1
2
3
4
5
6
Var tm:real;
Begin
    write('Введите температуру по фаренгейту: ');readln(tm);
    writeln('Температура по цельсию: ',5/9*(tm-32):0:2);
    readln;
End.
Добавлено через 59 секунд
Переводил из цельсия в фаренгейта а надо было наоброт
0
17.09.2012, 21:04
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.09.2012, 21:04
Помогаю со студенческими работами здесь

Вывести на экран таблицу соответствия температур в градусах Цельсия и Фаренгейта
Мне надо написать программу, которая выводит на экран таблицу соответствия температур в градусах...

Перевод из градусов Цельсия в градусы Фаренгейта
Я попытался написать программу по переводу градусов цельсия в градусы фаренгейта, но программа не...

Перевод градусов Фаренгейта в градусы Цельсия
есть задание- перевод градусов Фаренгейта в градусы Цельсия, максимальное значение-300,...

Перевод из градусов Цельсия в градусы Фаренгейта
Вобшем задача вроде простая при вводе градусов(F или С) должно их переводить. Например мне нужно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru