составьте алгоритм на паскале, когда было теплее в январе или декабре
5-9 класс
|
program temp:
var temp_12,temp_01:integer;
begin
write('Введите температуру в декабре: ');
readln(temp_12);
write('Введите температуру в январе: ');
readln(temp_01);
if temp_12 = temp_01 then write('Температура была одинаковой в обоих месяцах!')
esle
if temp_12 > temp_01 then
write('Температура в декабре была больше, чем в январе!')
else
write('Температура в январе была больше, чем в декабре!');
end.
Другие вопросы из категории
поле,контекстивное меню!(Это элементы диологовых окон)!!!
P.S. Программа должна определять максимальное из этих чисел.
var b,c:integer;
function back():integer;
const
a:array [1..10] of byte = (1,2,3,4,5,6,7,8,9,10);
var max,d,m:integer;
begin
max:=-100;
for m:=1 to 10 do;
begin
d:=a[m];
if d>max then max:=d;
back:=max;
end;
end;
begin
writeln(max);
end.
тоже находит число делителей числа n. Прав ли Коля?
Читайте также
программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.
ПОЖАЛУЙСТА,ХОТЯ БЫ НА ПАСКАЛЕ СОСТАВЬТЕ!
и составляют b руб(в месяц).Рост цен ежемесячно увеличивает расходы на 3%,составьте программу расчета необходимой суммы денег,которую нужно единовременно попросить у родителей,чтобы можно было прожить 10 месяцев,используя эти деньги.
натуральных чисел, не превышающих заданного натурального числа N.
Проверьте алгоритм трассировкой. Напишите программу на Паскале.
Мне необходимо составить алгоритм каждой буквы : н,у,р,л,а,н
Примерно алгоритм выглядит вот так- Поднять перо. Сместиться в точку.Опустить перо.Сместиться на вектор.
Составьте хотя бы алгоритм буквы Н