Сетевая паутина Оплела весь белый свет. Не пройти детишкам мимо. Что же это? интернет
like 5 0 dislike Он знает всё и даже больше, И к нам на поспешит. Любой вопрос, пусть очень сложный, Мгновенно с лёгкостью решит. Плетёт свою он паутину, Хотя, по сути, не паук. Он видит всё. Вы догадались? А, ну-ка, что это за друг? интернет
like 2 0 dislike Это будто паутина, В ней найдёшь ты всё о всех: О животных, о машинах, Будет дождь сегодня, снег? Всё про мир и о планете Прочитаешь в... интернете
like 4 0 dislike Её называют всемирная сеть, Чего в этой сети только нет! Она всё расскажет и даже покажет. Она называется как?... интернет
like 2 0 dislike Он всех нас объединяет, Обо всём на свете знает, Он кино тебе покажет, Обо всём тебе расскажет. интернет
like 4 0 dislike В нём есть игры и соцсети, Фильмы, почта, курс валют. Есть все новости планеты, В нём танцуют и поют. интернет
like 8 0 dislike Средство связи редким было, А сейчас — у всех оно. Вот уже беспроводное, Раньше — оптоволокно. интернет
//PascalABC.NET 3.1 сборка 1239 const n = 10; m = 10;
var i, j: integer; a, b: array[1..n, 1..m] of integer; f: boolean;
begin for i := 1 to n do begin for j := 1 to m do begin a[i, j] := random(50); write(a[i, j]:3, ' '); end; writeln; end; writeln;
for i := 1 to n do begin f := false; for j := 1 to m do begin if not f and (a[i, j] mod 2 = 1) then begin a[i, j] := 2 * a[i, j]; f := true; end; write(a[i, j]:3, ' '); end; writeln; end; end.
d = ((a**3)*b)-(2*a*(b**2)*(a+b))