Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

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

10-11 класс

2ОС (перевод осуществляется по формуле F = 1,8∙C + 32). ( конструкція while)

Sanya190900 20 июля 2014 г., 20:17:36 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Batyrgareeva
20 июля 2014 г., 21:56:12 (9 лет назад)

На паскале

 

var
A,B:array [0..15] of real;

i:integer;
Begin

For i:=0 to 15 do
A[i]:=i*2;

For i:=0 to 15 do begin
B[i]:=1.8*A[i]+32;
Writeln(A[i],' градуса(ов)','=',B[i],' по Фаренгейту'); end;

end.

 

 

ВОТ ЕЩЕ ЧЕРЕЗ WHILE 

 

var
A,B:array [0..15] of real;

i:integer;
Begin

For i:=0 to 15 do
A[i]:=i*2;

i:=0;
While i<=15 do begin
B[i]:=1.8*A[i]+32;
i:=i+1;
end;

For i:=0 to 15 do
Writeln(A[i],' градуса(ов)','=',B[i],'по Фаренгейту');
end.

+ 0 -
Nope987
20 июля 2014 г., 22:43:42 (9 лет назад)

var i:byte;
f:real;

begin
i:=0;
Writeln(' Градусы');
writeln('Цельсия Фаренгейта');
while i<=30 do begin
f:=1.8*i+32;
writeln(' ',i,' ',' ',f:0:2 );
i:=i+2;
end;
end.

 

без дурацкой лишней переменной=)

var i:byte;

begin
i:=0;
Writeln(' Градусы');
writeln('Цельсия Фаренгейта');
while i<=30 do begin
writeln(' ',i,' ',' ',1.8*i+32 );
i:=i+2;
end;
end.

 

во вложении прога,здесь пробелы убирают=(

 

Ответить

Другие вопросы из категории

Turbo Pascal: Компания по снабжению электроэнергией взимает плату с клиентов по тарифу: -7р. за 1 кВт/ч за первые 250 кВт/ч -17 р. за

кВт/ч если потребление свыше 250, но не превышает 300 кВт/ч

-20 р. за кВт/ч, если потребление свыше 300 кВт/ч

Потребитель израсходовал n кВт/ч. Подсчитать плату. ПОМОГИТЕ ПОЖАЛУЙСТА!!!!

Упростите логическое выражение g*(h+#(h*d)) до наиболее краткой формы

(для обозначения инверсии используется знак # перед переменной, например, #h означает h с инверсией, для обозначения логического сложения и умножения используются знаки + и *.

Что такое "механизм шифрования"?

Читайте также

Напечатать перевод температуры из градусов по шкале Цельсия (С) в

градусы по шкале Фаренгейта (F) для значений температуры от 0
0С до 400С с
шагом 5
0С. Формула перевода F=1,8С+32.

Паскаль.Циклы с условием

1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива

2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент

№1 Вывести на экран квадраты чисел от 1 до n. №2 Вывести на экран таблицу умножения от 1 до 10

числа n.

№3

Вычислить значение факториала n!

№4

В диапазоне от 1 до n вывести все четные числа на экран.

№5

Найти количество чисел, которые делятся на 3 и 5, из диапазона от 1 до n.

1. Пользователем вводится целое число. Вывести на экран последовательность целых чисел от единицы до этого числа.

2.Вывести на экран 10 строк, содержащие символ *, причем количество * в каждой строке должно быть равно номеру строки.
3.Пользователем вводится 2 целых числа. Вывести на экран сумму положительных четных чисел, находящихся в границах диапазона, указанного пользователем.
4. В результате работы программы формируется массив, состоящий из 10 элементов и заполненный случайными числами от 0 до 100. Вывести на экран этот же массив в порядке возрастания.
5.Вводится строка, содержащая буквы и цифры разного регистра (т.е. строчные и прописные буквы). В результате работы программы на экран выводится строка следующего вида: цифры в порядке возрастания, строчные буквы по алфавиту, прописные буквы по алфавиту.

Помогите пожааалуйста,вообще нереально сделать(задачи зависят друг от друга) 1.заполнить массив из 100 элементов случайными числами.вывести на

экран с 20 по 50 в строку через пробел

2.для первыз десяти элементов найти среднее арифмитическое

3.вывести на экран только четные элементы с 1 по 10 элементы массива

4.найти сумму нечетныз значений с 20 по 50 элемент

5.найти количество элементов кратныз заданному числу,введёного с клавиатуры среди всез элементок линейного массива



Вы находитесь на странице вопроса "6.Вывести на экран таблицу перевода температуры из градусов по шкале Цельсия (С) в градусы по шкале Фаренгейта (F) для значений от 0ОС до 30OС с шагом", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.