Ты должен помочь кому-то с заданием и получишь от этого баллы.
//PASCAL ABC.NET
var i, a: integer; arr: array [1..10] of integer;
begin for i := 1 to 10 do read(arr[i]); for i := 1 to 10 do begin if arr[i] mod 6 = 0 then a += arr[i]; end; Write(a/10);end.
1-В
2 -А
Сейчас ещё подумаю
V= 25600 бит/с
t = 180 сек
Найти I
Решение
I =v*t = 25600*180= 4608000/8=576000/1024=5625
Т а к ? ________________________________