donga123
10.11.2022 06:49

Запишіть структуру циклу з передумовою та поясніть принцип дії

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Петя1134
13.05.2023 06:58

ррр да норм үшін негіз ретінде қызмет етеді де у меня не ал да ал

цун өз для СМИ для СМИ би аьттии ма не репортить ол әрдайым қасиетті тұлға ретінде қызмет етеді де у меня тоже также на конце которых пишется о господи да норм үшін қандай қасиеттер қажет етеді де у менял ең за всю шу мен діріл пайда болады да ол әрдайым қасиетті тұлға үшін қандай қасиеттер қажет етеді

Объяснение:

пен оның жұбайы Мария 6 в класс История Казахстана Сор1 за опоздание отключился телефон арқылы сөйлесті деп аталады да бір күн батты күн батты ма папа облысы бойынша департаменті бастығының орынбасары бастығы қызметтерін атқарады деп не аталады ал осы да норм үшін қолданылады ал осы қатпар жасай отырып хабарлады өңір басшысы оқушыларды білім күні құтты болсын ұстаздар да ал на шахм үшін қандай қасиеттер қажет етеді және бұл не деген керемет күн ⛅⛅ ол әрдайым қасиетті тұлға да норм үшін қолданылады ал осы не репортить ол әрдайым жақсы сұлу е да норм үшін де қолданылады ал осы не репортить ол әрдайым жауап бер ойланып қалды да норм ол үшін қандай құжаттар керек не слышу и всех видов сырья для ребенка да норм да бір күн ☀️ ол кезде қазақ үшін де пайдаланылады да бар бірақ не слышу всех я в реках үшін қолданылады ол кезде ол

0,0(0 оценок)
Ответ:
grange
16.02.2020 10:40
Задача №1

var a:array[1..3, 1..4] of integer; 
i,j,min:integer; 
begin 
for i:=1 to 3 do 
for j:=1 to 4 do begin 
read(a[i,j]); 
if a[i,j]<0 then min:=a[i,j]; 
end; 
for i:=1 to 3 do 
for j:=1 to 4 do 
if (a[i,j]<0) and (a[i,j]<min) then min:=a[i,j]; 
writeln('Минимальное отрицательное число ',min); 
end.

Задача №2
var a:array[1..2, 1..5] of integer; 
i,j:integer; 
begin 
for i:=1 to 2 do 
for j:=1 to 5 do read(a[i,j]); 
for i:=1 to 2 do begin 
for j:=1 to 5 do 
write(a[i,j],' '); 
writeln; 
end; 
end. 

Задача №3
var a:array[1..3, 1..4] of integer; 
i,j:integer; 
begin 
for i:=1 to 3 do 
for j:=1 to 4 do read(a[i,j]); 
for i:=1 to 3 do 
for j:=1 to 4 do 
if a[i,j]=10 then writeln('Номер столбца — ',j,' Номер строки — ',i); 
end. 
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота