Введите в компьютер программу Example2.

Информатика 9 класс Семакин ФГОС

§ 19 Одна задача обработки массива ГДЗ по Информатике 9 класс. Семакин


2. Введите в компьютер программу Example2. Выполните программу, получите результаты.

Ответ

Program Example2;
var Rand: array[1..20] of integer;
I,X,NumberX:integer;
begin
Randomize;
writeln(‘Masiv slychainix chisel’);
for I:=1 to 20 do
begin
Rand[I]:=random(50);
write(Rand[I]:4)
end;
writeln;
write(‘Vvedite X:’);
readln(X);
NumberX:=0;
for I:=1 to 20 do
if Rand[i]=X
then NumberX:=NumberX+1;
if NumberX=0
then writeln(‘V masice net chisla ‘,X)
else writeln(‘Chislo ‘,X,’v masive prisytsvyet ‘,NumberX,’paz’)
end.


Понравилась статья? Поделиться с друзьями: