Автор Тема: Массивы. Напечатать таблицу перевода  (Прочитано 8106 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн poiuyt

  • Пользователь
  • **
  • Сообщений: 30
    • Просмотр профиля
Напечатать таблицу перевода температуры из градусов по шкале Цельсия (С) в градусы по шкале Фаренгейта (F) для значений T от 15С до 30С с шагом 1С. (Перевод осуществляется по формуле F = 1,8 C × 32 С).
вообще я почитал что при переходе из цельсия на фарингеит нужно *1.8+32 так проверьте прогу но чет пишет что не правильно почему?

program prim3;
var i:integer;
    f:real;
    a: array [15..30] of integer;
begin
for i:=15 to 30 do read(a);
for i:=15 to 30 do begin f:=(a*1,8)+32;
                          writeln('f=',f:9:3);
                            end;
  end.
« Последнее редактирование: 04 Апреля 2010, 09:36:28 от Asix »

Оффлайн poiuyt

  • Пользователь
  • **
  • Сообщений: 30
    • Просмотр профиля
Re: Массивы. Напечатать таблицу перевода
« Ответ #1 : 31 Марта 2010, 22:48:10 »
пожалуйста помогите мне срочно
« Последнее редактирование: 04 Апреля 2010, 09:36:36 от Asix »

Оффлайн Данила

  • Глобальный модератор
  • *****
  • Сообщений: 1657
  • Математик-экстрасенс
    • Просмотр профиля
Re: массивы
« Ответ #2 : 31 Марта 2010, 23:13:08 »
program prim3;
var i:integer;
    f:real;
    a: array [0..15] of integer;
begin
  for i:=0 to 15 do a[i]:=i+14;
  for i:=0 to 15 do begin
        f:=(a[i]*1.8)+32;
writeln('f=',f:9:3);
        end;
  readln
  end.

почему у вас индексация массива начинается с 15? и зачем циклы делать с кривой индексацией?
Просьба не кидать мне в ЛС Ваши задания...создаем тему,пишем свое задание,наработки\идеи...полностью и нахаляву ничего не решаю

Вам в помощь:
∫ ¼ ½ ¾ ⅓ ⅔ ⅛ ⅜ ⅝ ⅞ ² ³ ± ~ ‰ ∞ √ ∑ ∆ ℮ ∩ ≡ ≤ ≥ ≈ ∩

Оффлайн poiuyt

  • Пользователь
  • **
  • Сообщений: 30
    • Просмотр профиля
Re: Массивы. Напечатать таблицу перевода
« Ответ #3 : 31 Марта 2010, 23:15:27 »
да ошибка 1..15 а дальше
« Последнее редактирование: 04 Апреля 2010, 09:36:46 от Asix »

Оффлайн poiuyt

  • Пользователь
  • **
  • Сообщений: 30
    • Просмотр профиля
Re: Массивы. Напечатать таблицу перевода
« Ответ #4 : 31 Марта 2010, 23:18:12 »
мне выписывает в строке for i:=1 to 15 do  f:=(a*1,8)+32; попытка присвоить переменной real выражение типа complex непонятно
« Последнее редактирование: 04 Апреля 2010, 09:36:51 от Asix »

Оффлайн Данила

  • Глобальный модератор
  • *****
  • Сообщений: 1657
  • Математик-экстрасенс
    • Просмотр профиля
Re: Массивы. Напечатать таблицу перевода
« Ответ #5 : 31 Марта 2010, 23:21:11 »
посмотрите мой код...он компилится и выводит то,что надо...откуда там комплекс не пойму
« Последнее редактирование: 04 Апреля 2010, 09:36:57 от Asix »
Просьба не кидать мне в ЛС Ваши задания...создаем тему,пишем свое задание,наработки\идеи...полностью и нахаляву ничего не решаю

Вам в помощь:
∫ ¼ ½ ¾ ⅓ ⅔ ⅛ ⅜ ⅝ ⅞ ² ³ ± ~ ‰ ∞ √ ∑ ∆ ℮ ∩ ≡ ≤ ≥ ≈ ∩

Оффлайн poiuyt

  • Пользователь
  • **
  • Сообщений: 30
    • Просмотр профиля
Re: Массивы. Напечатать таблицу перевода
« Ответ #6 : 31 Марта 2010, 23:25:44 »
спасибо заработало
« Последнее редактирование: 04 Апреля 2010, 09:37:04 от Asix »

 

Помогите организовать файл в котором содержуться разные массивы

Автор sheo92

Ответов: 1
Просмотров: 4832
Последний ответ 09 Декабря 2009, 18:24:25
от InfStudent
Задачка на двумерные массивы в паскале

Автор Venesia

Ответов: 1
Просмотров: 5439
Последний ответ 24 Декабря 2010, 09:40:41
от @len@_k
Массивы (простая задачка) Фортран

Автор Fencer

Ответов: 3
Просмотров: 2522
Последний ответ 24 Апреля 2012, 20:04:26
от wital1984
Помогите решить задачку в VB на массивы

Автор SvetlanaG

Ответов: 8
Просмотров: 2858
Последний ответ 18 Мая 2012, 09:29:59
от Selyd
С++. Структуры и массивы структур.

Автор Beauty44

Ответов: 0
Просмотров: 3256
Последний ответ 22 Сентября 2013, 17:55:56
от Beauty44