Ну алгоритм: просто суммируешь поочерёдно.(можно кубиками нарисовать, но это мне делать не удобно, тем более не сложно)
Вот прога на паскале:
program sym
var p:array[1..12] of integer;
s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
p[i]:=i*i; //если нет уже готового массива
For i:=1 to 12 do
s:=s+p[i];
write(s)
end.
Ну тут кстати массив излишен, если надо просто найти сумму:
program sym1
var s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
s:=s+i*i;
write(s)
end.
Я у себя не проверял, но должно работать)
Смотря где. В JS, допустим, это выбор действия в зависимости от значения переменной. Пример:
switch (x) {
case 1: ... break;
case 2: ... break;
default: break;
}
Инструкция "break" прекращает перебор значений. Если она отсутствует, выполнятся все следующие инструкции в списке, при этом проверки уже не будут выполняться. Если значение отсутствует, выполняется блок "default".
Внешние устройства:Клавиатура,мышь
Var
amoebas, t: integer;
begin
amoebas := 1;
t := 0;
repeat
t := t + 3;
amoebas := amoebas * 2;
Writeln(amoebas, ' амеб через ', t, ' часа');
until t >= 24;
end.
Ответ:
Программа запускалась в PascalABC.NET
Объяснение: