сервис вопросов и ответовНужно написать программу в паскале. Срочно, помогите пожалуйста. Дан массив с температурам за январь от -35 до 35. Определить самый теплый день, дни,
5-9 класс|
|
когда температура была больше нуля.
Танчела
06 окт. 2013 г., 13:52:58 (10 лет назад)
Alenka548
06 окт. 2013 г., 16:07:42 (10 лет назад)
var
a:array[1..31] of integer;
i, index:integer;
begin
randomize;
index := 1;
writeln('Температура по дням:');
for i := 1 to 31 do
begin
a[i] := random(71) - 35;
writeln ('a[', i, '] = ',a[i]);
if a[i] > a[index] then
index := i;
end;
writeln;
writeln('Самы теплый день - ', index, ' ,t = ', a[index]);
writeln('Дени в котрых температура была > 0');
for i := 1 to 31 do
if a[i] > 0 then
write(i, ' ');
readln;
end.
Ответить
Другие вопросы из категории
срочно нужно! помогите с информатикой!
сочинить алгоритм распознования кошки
заранее благодарю!
Читайте также
Срочно, помогите пожалуйста!
Написать программу в паскале. Цикл "пока".
Одноклеточная амёба каждые 3 часа делится на 2 клетки. Определить через сколько часов будет X амёб. X - вводится с клавиатуры.
Пожалуйста помогите создать какую нибудь полезную программу на паскаль , срочно нужно до понедельника, чтобы в этой программе были все темы за 8 класс,
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!
Помогите , пожалуйста . Нужно написать программу для Паскаль.
Ввести пять чисел и найти наибольшее из них.
Я тут написал кое-что ,но не знаю правильно ли :(
HELP ME.
program ru;
var a,b,c,d,e,max:integer;
begin
writln('Введите пять целых чисел');
if a>b then
begin
max:=a;
end
else begin
max:=b;
end;
if max>c then
begin
max:=max;
else begin
max:=c;
end;
if d>e then begin
max:=d;
end
else begin
max:=e;
end.
Ребят) Помогите с программой на Паскале, пожалуйстаа)
Нужно написать программу, которая выводит на экран все двухзначные числа, делящиеся на 3 или на 5 (использовать операции целочисленного деления div или mod)
Вы находитесь на странице вопроса "Нужно написать программу в паскале. Срочно, помогите пожалуйста. Дан массив с температурам за январь от -35 до 35. Определить самый теплый день, дни,", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.