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

В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество самых прохладных дней в этом месяце.

10-11 класс

Yaroslava280803 21 янв. 2014 г., 1:24:10 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
School132
21 янв. 2014 г., 3:26:18 (10 лет назад)

var

a:array[1..31] of real;

i,k:integer;

min:real;

begin

min:=50;

for i:=1 to 31 do

begin

readln(a[i]);

if a[i]<min then min:=a[i];

end;

k:=0;

for i:=1 to 31 do

if a[i]=min then k:=k+1;

writeln(k);

end.

Ответить

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

Для шифровки каждой буквы слова используюестя двузначное число.Известно что бука "к" кодируется числом 15.среди слов торт ежик станок беседа есть слова,код

ируемые поледывательностью цифр 35291815 303113241115.Какая последовательность цифр является кодом слова китёнок

Помогите пожалуйста с задачками))) Pascal

1) Найти сумму всех элементов массива, заполненных случайными числами?
2) Найти сумму четных элементов массива?
3) Найти сумму элементов массива, стоящих на четных местах?

Олимпиадные задачи требуют ввод-вывод данных с использованием внешних файлов как это сделать? ИНФОРМАТИКА конспекты уроков 9-11 классы Чернов

А.А. с198

program pr;

uses crt;

var f:file of integer;

n:integer;

a:string;

begin

clrscr;

a:='c:\f1.txt';

assign(f,a);

rewrite(f);

writeln('n: ');

readln(n);

write(f,n);

close (f);

readln;

end.

после выполнения программы в файле f1.txt вместо значения n=5 появилось -256

что не так ?

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

1. Дан массив. Напечатать:

а) Все четные элементы
б) Все элементы, оканчивающиеся нулем.

2. В массиве хранится информация о количестве осадков, выпавших каждый день января. Определить, в какие числа месяца осадков не было.

Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать

только элементы кратные 2

3)Найти сумму первых пяти элементов

Составить программу Дан массив целых чисел , размерность -12

1) Заполнение массива производить случайными числами из диапозона [-10;35]

2)Вывести на печать только положительные элементы

3)Найти количество отрицательных элементов

Составить программу

Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .



Вы находитесь на странице вопроса "В массиве хранится информация о среднедневной температуре за каждый день июля. Определить количество самых прохладных дней в этом месяце.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.