помогите составте 3 алгаритма ветвления.
5-9 класс
|
1) вставать с утра
2) почистить зубы и помыть руки
3)покушать
4)собраться
5)идти в школу
6)подготовиться к уроку
Конец ето 1 предложение
Другие вопросы из категории
раза.Сколько бит информации содержалось в переданном сообщении,если в набор сигнальщика входило 16 флажков???(С объяснением пожалуйста)
Var s,k: integer;
Begin
s:=0;
for k:=4 to 10 do
s:=s+11;
write(s);
End.
представте с помощью блок-схемы алгоритм решения
Читайте также
знаки и затем найти сумму Помогите алгоритм составить в Паскале .
типо по такой же системе которую щас напишу! program Maximum; i,n,max:integen; begin writeln ( 'введи элементы массива для поиска максимума'); for i:=1 to 10 do begin write ('a [', i ,']=');readln (a [ i ] ) ;end; max:=a[1]; for i = 2 to 10 do if a [ i ] > max then begin max:=a [ i ] ; n:= i ; end; writeln ('найти наибольший элемент ',max ,' под номером ', n); вот наподобие этого примера нужно построить мою задачу! в заданной последовательности целых чисел определите сумму элементов кратных 10. Помогите пожалуйста!!!