Выполняем на компьютере В MS Excel создайте БД «Мои друзья» на примере
следующей таблицы.
Дата
No Фамилия Имя Отчество
Город
рождения
1 Абылай Венера Бериковна 22.03.2004 Нур-Султан
2 Жапаров Кайрат Абаевич 02.12.2004 Алматы
3 Раева Жанна Жакеевна. 13.04.2003 Алматы

202

495

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

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

Grooshka

Информатика

4,8(60 оценок)

1и 3)var ar: array[1..50] of integer; i,k,min: integer; begin; min: =100; writeln('array: '); for i: =1 to 50 do begin; ar[i]: =random(10)-5; write(ar[i]: 4); if ar[i]=0 then inc(k); if ar[i]< min then min: =ar[i]; end; writeln; writeln('0: ',k); writeln('min: ',min); end. 2) var ar: array[1..40] of integer; i,k: integer; begin; writeln('array: '); for i: =1 to 40 do begin; ar[i]: =random(10)-5; write(ar[i]: 4); if ar[i]> 1 then inc(k); end; writeln('result: ',k); end.