Напишите программу вычисления скорости движения,условия с клавиатуры вводится пройденный путь и время движения на языке блок схем и паскаль
294
395
Ответы на вопрос:
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 и проверит есть ли в нем число, заданное пользователем. выведет пояснение.
Популярно: Информатика
-
DashaKim12306.05.2023 05:48
-
Logicsmile00709.06.2022 20:53
-
MiSTiKA2329.08.2021 21:49
-
8HELP815.01.2023 17:33
-
АрзуНаз14.04.2021 12:19
-
mashapermyakova13.09.2021 07:52
-
dilnoza200612.04.2023 13:17
-
Sharkade04.06.2023 08:36
-
Mashyanova201609.01.2020 14:41
-
katia617318.12.2022 09:57