На каком языке надо? Если паскаль то держи: 1)Program A; Var a:Integer; Begin Write('Введите двузначное число'); Read(a); If (a>10) and (a<100) Then Writeln('Число является двузначным') Else Writeln('Вы ввели не двузначное число!'); End.
2)var i,a:integer; begin a:=2; for i:=1 to 20 do begin a:=a-1; writeln(a); end; end.
3)Там можно и самому просто дели 555 на 2 как можно больше чтоб конечный ответ был 2/2=0 и там считай уже
4)program b; var a:integer; begin write('Введите любое четное число= '); read(a); if a mod 2 = 0 then write('ответ= ',a/2) else write('Было введено нечетное число!'); end.
5)program d; var i,a:Integer; begin a:=2; for i:=1 to 20 do begin a:=a+10; writeln(a); end; end.
6)Его надо делать так же как число и 555 а ответ вообще 4 единицы
Skvik71
21.02.2020
Все удачные наборы команд должны включать остановку на отметке 10 футов. На отметку 1 фут робот может попасть с одной команды A; на отметку 2 фута - с команд AA и B (всего 2 набора команд); на отметку 3 фута - с команд AAA, AB, BA и C (4 набора). Так как за одну команду робот может переместиться на 1, 2 или 3 фута, то для подсчета количества наборов команд, позволяющих роботу попасть на отметки N > 3, можно использовать формулу K(N) = K(N-1)+K(N-2)+K(N-3). K(4) = K(3)+K(2)+K(1) = 4+2+1 = 7 K(5) = K(4)+K(3)+K(2) = 7+4+2 = 13 K(6) = K(5)+K(4)+K(3) = 13+7+4 = 24 K(7) = K(6)+K(5)+K(4) = 24+13+7 = 44 K(8) = K(7)+K(6)+K(5) = 44+24+13 = 81 K(9) = K(8)+K(7)+K(6) = 81+44+24 = 149 K(10) = K(9)+K(8)+K(7) = 149+81+44 = 274 Так как вторая часть пути робота также имеет длину 10, то общее количество удачных наборов команд = 274*274= 75076
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Напишите минимальное основание системы счисления, допустимое для данных чисел. ответ обосновать. 1) 11025 2) 201021 3) 345 4) а13 5) 8с710 6) 302047
1) Шестиричная. Ибо максимальная цифра 5
2) Третичная. То же обоснование
3) Шестиричная.То же обоснование
4) Одиннадцатиричная. А - это 10
5) Триннадцатиричная. С - это 12
6) Восьмиричная. То же обоснование