Var d:array[1..10] of integer;
s,i:integer;
Begin
s:=1;
For i:=1 to 10 do
begin
readln(d[i]);
If d[i]<>0
Then S:=S*d[i];
end;
Writeln(S);
end.
Ответ: a 25
Я пронумеровал каждую букву и стирал по четыре буквы и четыре номера (одинаковых) до тех пор, пока не получил оставшейся номер 25 и букву a.
1) 70
2) 427
3)50
4) нет вопроса
5) 3400
6) 2200
7)277
8) 250
9) 533
10) 140
Алгоритм с повторением (циклический) – это алгоритм, который содержит команду повторения (команду, которая исполняется до тех пор, пока не выполнится условие). ЗАДАЧА: составить графический алгоритм наполнения ведра водой из бочки. Алгоритм Наполнение Начало 1. Пока ведро неполное, повторять: 2. Налить в ведро кружку воды. Конец. Команда повторения. Тело цикла.
А - <span>11100001 - 225
б - </span>11100010 - 226<span>
а - </span><span>11100001 - 225
к - </span><span>11101011 - 235
С - </span><span>11110011 - 243
о - </span>11101111 - 239<span>
р - </span>11110010 - 242<span>
о - </span>11101111 - 239<span>
б - </span>11100010 - 226<span>
а - </span>11100001 - 225<span>
н - </span>11101110 - 238