1 программа:
var a, sum:integer;
begin
writeln('Введите числа (цифра 0 - выход из программы)');
sum:= 0;
readln(a);
while(a <> 0) do begin
sum:= sum + a;
readln(a);
end;
writeln('Сумма чисел = ', sum);
end.
2 программа:
var a, sum:integer;
begin
a:=0;
while(a <= 100) do begin
if (a mod 2 = 0) then
sum:= sum + a;
a:= a + 1;
end;
writeln('Сумма четных чисел = ', sum);
end.
3 программа:
var a, i, N:integer;
begin
writeln('Введите N');
readln(N);
a:=1;
for i:=1 to N do begin
write(a*a, ' ');
a:= a + 1;
end;
end.
1 программа:
var a, sum:integer;
begin
writeln('Введите числа (цифра 0 - выход из программы)');
sum:= 0;
readln(a);
while(a <> 0) do begin
sum:= sum + a;
readln(a);
end;
writeln('Сумма чисел = ', sum);
end.
2 программа:
var a, sum:integer;
begin
a:=0;
while(a <= 100) do begin
if (a mod 2 = 0) then
sum:= sum + a;
a:= a + 1;
end;
writeln('Сумма четных чисел = ', sum);
end.
3 программа:
var a, i, N:integer;
begin
writeln('Введите N');
readln(N);
a:=1;
for i:=1 to N do begin
write(a*a, ' ');
a:= a + 1;
end;
end.
Итак, вот ответы:
1) 3. небольших общественных веб-сайтов.
2) 4. текстовом процессоре Word.
3) 3. веб-дизайн.
4) 4. html.
5) 1. структуру и содержание.
6) 2. не пишите слишком длинных текстов. текст разбивайте на небольшие абзацы, отделяя их друг от друга пустыми строками.
4. названия пунктов меню делайте краткими; недопустимо растягивание названия пункта на несколько строк.
7) 4. шаблон.
все ответы на 100% верны, можете не волноваться. сама только, что тест и решила поделиться с вами правильными ответами. была рада удачи на экзаменах.)