Регистрация
nastya200525
17.06.2021 10:41
Информатика
Есть ответ 👍

Пользователь вводит вещественнок число, если оно принадледит промежутку от[3; 5)u(7; +бесконечности),т . увеличте это число в 2 раза и выведите на экран, иначе выводит на экран "не принадлежит"

206
365
Посмотреть ответы 1

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

Ира21fu
Ира21fu
4,5(52 оценок)

var a: array[1..10]of integer;

i,n: byte; s: integer;

begin

for i: =1 to 10 do a[i]: =random(101);

for i: =1 to 10 do write(a[i],' ');

for i: =1 to 10 do

if (a[i]< 20) or (a[i]> 50) then begin inc(n); s: =s+a[i]; end;

writeln(n,' ',s);

end.

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