Массивы: сколько раз показатель термометра на следующий день отличался от показаний текущего дня по знаку?

@Tarick · Регистрация: 29.01.2013

Студворк — интернет-сервис помощи студентам

в городе в течении 30 дней каждое утро измерялась температура воздуха с точностью до градусов ( случайные целые числа от -5 до 5). сколько раз показатель термометра на следующий день отличался от показаний текущего дня по знаку ?
например : 4 0 -3 -1 3 5 -2 правильный ответ 3 раза (0-(-4) , -1 - +3, +5 - (-2))

@Тамила · 25.04.2013, 12:56

Pascal

uses crt;
var
   temp:array[1..30]of integer;
   i,kol:integer;
begin
   clrscr;
   randomize;
   for i:=1 to 30 do
    begin
       temp[i]:=random(11)-5;
       write(temp[i],'  ');
    end;
   writeln;
   kol:=0;
   for i:=1 to 29 do
    if temp[i]*temp[i+1]<0 then
     begin
        kol:=kol+1;
        write(temp[i],' (',temp[i+1],'); ');
     end;
   writeln;
   writeln('kol-vo= ',kol,' raz');
   readkey;
end.

@Tarick 1 / 1 / 0 Регистрация: 29.01.2013 Сообщений: 90
		1
	Массивы: сколько раз показатель термометра на следующий день отличался от показаний текущего дня по знаку? 24.04.2013, 20:11. Показов 1329. Ответов 1 Метки нет (Все метки) в городе в течении 30 дней каждое утро измерялась температура воздуха с точностью до градусов ( случайные целые числа от -5 до 5). сколько раз показатель термометра на следующий день отличался от показаний текущего дня по знаку ? например : 4 0 -3 -1 3 5 -2 правильный ответ 3 раза (0-(-4) , -1 - +3, +5 - (-2)) 0

Опции темы

Массивы: сколько раз показатель термометра на следующий день отличался от показаний текущего дня по знаку?

Решение