1. Дан массив натуральных чисел. Вывести на экран все двухзначные числа.

2. В массиве хранятся сведенья об оценках 25-ти учеников по английскому языку. Определить количество "5", "4", "3", "2".

Question

Информатика

Валя

28 октября, 01:17

1. Дан массив натуральных чисел. Вывести на экран все двухзначные числа.

2. В массиве хранятся сведенья об оценках 25-ти учеников по английскому языку. Определить количество "5", "4", "3", "2".

+1

Ответы (2)

Знаете ответ на вопрос?

Натоша · Answer 1

1.

program one

var

i:integer;

mas : array[1 ... n] of integer;

begin

for i:=1 to n do

begin

if (mas[i] 9) then

writeln (mas[i]) ;

end;

end.

Каллисфен · Answer 2

Var Y, a, b, c, d:real;

begin

a:=5;

b:=4;

c:=3;

d:=2;

Y: = ('formula') ;

readln;

end.

Приблизительно как то так, формулу сами подставите что бы определить кол-во 25 человек.