Var
mj,max,i,j,m,n:integer;
mas:array[1..999,1..999] of integer;
begin
randomize;
readln(m,n);
for i:=1 to m do
for j:=1 to n do
read(mas[i,j]);
for i:=1 to m do
begin
mj:=-maxint;
max:=-maxint;
for j:=1 to n do
if mas[i,j] > max then
begin
mj:=j;
max:=mas[i,j];
end;
writeln('[',i,';',mj,'] = ',max);
end;
end.
Компьютеры от компании apple.
1 килобайт=1000 байт
Значит 10 килобайт=10000 байт
когда сохроняешь картинку надо нажать сохранить как выбираешь куда сохранять и в названии после имени стоит формат. ты его стираешь и ставишь нужный
а диаграмма не копируется?
Sum = 0
while x!= 0:
a = int(input())
if( a % 10 == 3) or (a % 3 == 0):
sum+=1
print(sum)
только я надеюсь вы знаете как оформляется цикл и if. Ибо здесь всё формотируется и все нужные TAB'ы исчезают