ovalenceva77
?>

Дайте название программы для создания сайта = версия=!

Информатика

Ответы

Vorotko814
"для создания сайта"? для тостера  adobe dreamweaver хорош, только хостингу стукни, чтобы сайт тебе сделали, а если чайником хочешь быть - удачи с asp, php, html, css и js
Khlustikova_Borisovna
Занятия проводятся по расписанию. toggle bar    алгоритмы  25 марта 2013  просмотров: 8211 алгоритмы. способы записи алгоритмов выделяют три наиболее распространенные на практике способа записи алгоритмов: словесный  (запись на естественном языке); графический  (запись с использованием графических символов); программный  (тексты на языках программирования). словесный способ записи алгоритмов словесный способ – способ записи алгоритма на естественном языке. данный способ удобен, если нужно приближенно описать суть алгоритма. однако при словесном описании не всегда удается ясно и точно выразить логику действий. в качестве примера словесного способа записи алгоритма рассмотрим алгоритм нахождения площади прямоугольника s=a*b, где s – площадь прямоугольника; а, b – длины его сторон. очевидно, что a, b должны быть заданы заранее, иначе решить невозможно. словестный способ записи алгоритма выглядит так: начало алгоритма.задать численное значение стороны a.задать численное значение стороны b.вычислить площадь s прямоугольника по формуле s=a*b.вывести результат вычислений.конец алгоритма.
Yurevna-Anatolevna

1)program zadacha1; uses crt; var b,i,j: integer; c,pr: real; a: array [1..4,1..7] of integer; beginclrscr; pr: =1; for i: =1 to 4 dobegin for j: =1 to 7 do begin readln(a[i,j]); end; end; for i: =1 to 4 dobegin for j: =1 to 7 do begin if (a[i,j] mod 3) = 0 then pr: =pr*a[i,j]; end; end; pr: =pr/3; writeln(pr: 2: 3); readkey; end.2)program zadacha2; uses crt; const k=8; var b,i,j,sum: integer; c,pr: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; pr: =1; for i: =1 to k dobegin for j: =1 to k do begin a[i,j]: =random(36)+10; end; end; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; for j: =1 to k do begin if (a[k,j] mod 5) = 0 then pr: =pr*a[i,j]; end; for i: =1 to k dobegin for j: =1 to k do begin if (i=j) and (a[i,j] > 0) then sum: =sum+a[i,j]; end; end; writeln('prozvedenie ',pr: 2: 2); writeln('summa ',sum); writeln('raznostb ',pr-sum: 2: 2); readkey; end.3)program zadacha3; uses crt; const k=9; var b,i,j: integer; sred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do begin a[i,j]: =random(55-12+1)+12; end; end; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; for i: =1 to k dobeginif (a[i,k] mod 2) = 1 then begin l: =l+a[i,k]; b: =b+1; end; end; sred: =l/b; for i: =1 to k dobegin if a[i,i]> 25 then sum: =sum+a[i,i]; end; writeln; writeln('srednee ',sred: 2: 2); writeln('summa ',sum: 2: 1); readkey; end.4)program zadacha4; uses crt; const k=5; var b,i,j: integer; sred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do begin a[i,j]: =random(91)-20; end; end; j: =k; for i: =1 to k dobegin if (a[i,j] mod 2)< > 0 then begin l: =l+a[i,j]; b: =b+1; end; j: =j-1; end; sred: =l/b; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; writeln; writeln('srednee ',sred: 4: 2); readkey; end.5)program zadacha5; uses crt; const k=5; var b,i,j: integer; sred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do begin a[i,j]: =random(31)-40; end; end; j: =k; for i: =1 to k dobegin if (a[i,j] mod 2)< > 0 then begin l: =l+a[i,j]; b: =b+1; end; j: =j-1; end; sred: =l/b; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; writeln; writeln('srednee ',sred: 4: 2); readkey; end.6)program zadacha6; uses crt; const k=6; var b,i,j: integer; sred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do begin a[i,j]: =random(21); end; end; j: =k; for i: =1 to k dobegin if a[i,j]> 5 then begin l: =l+a[i,j]; end; j: =j-1; end; l: =l/2; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; writeln; writeln('sum ',l: 2: 2); readkey; end.7)program zadacha7; uses crt; const k=5; var b,i,j: integer; pred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do a[i,j]: =random(10); end; j: =k; for i: =1 to k dobegin l: =l+a[i,j]; j: =j-1; end; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; for i: =1 to k dobegin sum: =sum+a[i,i]; end; pred: =sum+l; writeln('sum ',pred/10: 2: 2); readkey; end.8)program zadacha8; uses crt; const k=5; var b,i,j: integer; pred,sum,l: real; a: array [1..k,1..k] of integer; beginrandomize; clrscr; for i: =1 to k dobegin for j: =1 to k do a[i,j]: =random(10); end; j: =k; for i: =1 to k dobegin l: =l+a[i,j]; j: =j-1; end; l: =l/k; for i: =1 to k dobegin for j: =1 to k do write(a[i,j],' '); writeln; end; for i: =1 to k dobegin sum: =sum+a[i,i]; end; sum: =sum/2; writeln('sum ',sum: 2: 2); writeln('sred',l: 2: 2); readkey; end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дайте название программы для создания сайта = версия=!
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

vera-spicina
mmreznichenko
Зинина-Олесия
tvmigunova551
Bezzubova_Stepanov1355
Aleksandr-Andrei
Панков1101
edubenskaya
Zhulanova-IP501
Сергеевна
mulyugina365
strager338
katar050419735
slipu817838
ldfenix87