Решите задачу на паскале пожалуйста-в регионе 8 областей…

Question

Решите задачу на паскале пожалуйста-в регионе 8 областей, в течении ряда лет ведется компьютерный учет кол-ва преступлений по кажлой области, найти ивывести на экран название областей в которых было произведено максимальное и минимальное кол-во преступлений в прошлом и текущих годах.

Answer 1

40

sergei63

07 марта 2023

type t=array[1… 8] of integer; var a: t; g,n,i,max,min,j: integer; beginfor i: =1 to 8 doa[i]: =0; write ('сколько лет'); read (g); for j: =1 to g dofor i: =1to 8 dobeginwrite ('сколько преступления за этот год в этой области'); read (n); a[i]: =a[i]+n; end; max: =0; min: =a[1]; for i: =1 to 8 dobeginif a[i]>max then max: =a[i]; if a[i]

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: