Есть ответ 👍

Напишите программу вычисления скорости движения,условия с клавиатуры вводится пройденный путь и время движения на языке блок схем и паскаль

294
395
Посмотреть ответы 1

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


Program diapozon; var a: array [1..20] of integer; x: integer; i: shortint; begin randomize; for i: = 1 to 20 do a[i]: = random(-20,60); write('введите число, которое нужно проверить > > '); readln(x); for i: = 1 to 20 do if(a[i] = x) then begin writeln('это число есть в массиве'); exit; end; writeln('этого числа нет в массиве'); end. //программа создаст массив из 20 элементов с числами от -20 до 60 и проверит есть ли в нем число, заданное пользователем. выведет пояснение.

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