Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/22: Рейтинг темы: голосов - 22, средняя оценка - 4.50
Ciber1234
0 / 0 / 0
Регистрация: 16.06.2015
Сообщений: 2
1

Вывести на экран таблицу перевода из градусов по шкале Цельсия в градусы по Фаренгейту

16.06.2015, 13:24. Просмотров 4210. Ответов 1
Метки нет (Все метки)

1)Вывести на экран таблицу перевода из градусов по шкале Цельсия в градусы по Фаренгейту для значений от 15С до 30С с шагом в 1С. Перевод осуществляется по формуле: F=C*1.8+32.

Pascal
1
2
3
4
5
6
7
8
9
10
Program zf; 
Var i:integer; f:real; 
Begin 
Writeln(‘Температура’); 
For i:=15 to 30 do 
Begin 
F:=i*1.8+32; 
Writeln(‘по Цельсию’, i, ‘по Фаренгейту’, f:5:2); 
End; 
End.

2)Определить самую высокую температуру и самый теплый день в мае.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Program massiv; 
Uses crt; 
Var  t:array [1..31] of integer; 
       I, max, n : integer; 
Begin 
  Clrscr; 
  For i:=1 to 31 do 
       Begin 
       t[i]:=random(20); 
       Write(b[i], ‘ ‘); 
       End; 
  Max:=t[1]; n:=1; 
  For i:=2 to 31 do 
       Begin 
       If t[i] > max then max:=t[i]; n:=i ; 
       End; 
    Write(‘максимальная температура’, max, ‘в’, n, ‘день’); 
   End.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.06.2015, 13:24
Ответы с готовыми решениями:

Напечатать таблицу перевода температуры из градусов по шкале Цельсия в градусы шкалы Фаренгейта
Напечатать таблицу перевода температуры из градусов по шкале Цельсия в градусы шкалы Фаренгейта для...

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

Перевод температуры из градусов по шкале Цельсия в градусы по шкале Фаренгейта
Вывести на экран таблицу перевода температуры из градусов по шкале Цельсия (С) в градусы по шкале...

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

Напечатать таблицу перевода температуры из градусов по шкале Цельсия в градусы по шкале Фаренгейта
Помогите с циклами плиз... 1. Выполняется с помощью цикла for Напечатать таблицу перевода...

1
Puporev
Модератор
56857 / 43441 / 30035
Регистрация: 18.05.2008
Сообщений: 103,502
16.06.2015, 18:07 2
Апострофы исправь на нормальные
Pascal
1
Writeln('по Цельсию', i,'  по Фаренгейту', f:5:2);
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.06.2015, 18:07

Напечатать таблицу перевода температуры из градусов по шкале Цельсия в градусы по шкале Фаренгейта
Всем привет! Прошу помоч! Напечатать таблицу перевода температуры из градусов по шкале Цельсия...

Напечатать таблицу перевода температуры из градусов по шкале Цельсия в градусы по шкале Фаренгейта
Напечатать таблицу перевода температуры из градусов по шкале Цельсия (C) в градусы по шкале...

Таблица перевода температуры из градусов по шкале Цельсия в градусы шкалы Фаренгейта (Deplhi 7)
напечатать таблицу перевода температуры из градусов по шкале цельсия в градусы шкалы фаренгейта для...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru