Регистрация
ermolaeva1207Arina
02.03.2021 10:00
Информатика
Есть ответ 👍

Склавиатуры вводится 10 чисел,определить кол-во чисел в интервал от -15 до 30. в турбо паскале

144
302
Посмотреть ответы 2

Ответы на вопрос:

anyasaveleva2
anyasaveleva2
4,6(83 оценок)
Var a: array [1..10] of integer;       i,k: integer; begin   k: =0;   for i: =1 to 10 do     begin     write (i,'-oe chislo: ');     readln (a[i]);     if (a[i]> -15) and (a[i]< 30) then inc(k);     end;   writeln ('kol-vo: ',k); end.
GiftOfDeath
GiftOfDeath
4,4(24 оценок)

ответ: =$В*7...........

Популярно: Информатика