а где сама таблица? все равно она везде одинаковая, так что держите фрагмент ваш:
byck is my dog.
Ответ дал: Гость
qbasic
screen 7
input x
input y
input c
s=x+y/2*c
print "x+y/2*c="; s
end
Ответ дал: Гость
-,андрей!
-,паша!
-как у тебя дела?
-у меня всё хорошо,а ты как?
-у меня всё отлично. что спросил
-не за что.пойдёшь сегодня гулять?
-да,конечно.а во сколько?
-в 5 часов.
-хорошо.ладно пока.
пока.встретимся на улице
-хорошо.
Ответ дал: Гость
держи:
program kk; uses crt; var a: array [1..5,1..5] of integer; i,j: integer; beginclrscr; randomize; for i: =1 to 5 dobeginfor j: =1 to 5 doa[i,j]: = random(90)+10; end; for i: =1 to 5 dobeginfor j: =1 to 5 do write(a[i,j],' '); writelnend; writeln; writeln; for i: =1 to 5 dobeginfor j: =1 to 5 dobegin if (a[i,j] > 0) and (a[i,j] mod 3 = 0) thenbeginwriteln(a[i,j],' [',i, ',',j,']'); end; end; end; readkey; end.
Популярные вопросы