atvkaprolon
?>

Задание 1. Определите значение переменной а после выполнения данного алгоритма: a:=28; b:=35; b:= (b-5)/6 a:=b*(a+b-3) Задание 2. Определите значение целочисленных переменных a и b после выполнения фрагмента программы: а :=7*11 + 4; b :=(a div 10)+ 6; a :=(b mod 10)+ 3; Задание 3. Определите значение переменной c после выполнения следующего фрагмента программы: a := 6 ; b := 15 ; a := b – a*2; if a>b then c := a + b else c := b – a; Задание 4. Определите, что будет напечатано в результате работы следующей программы: var s, k: integer; begin s:=5; for k:=7 to 14 do s:=s+2*k; write(s); Задание 5. а) Составьте алгоритм в виде блок-схемы на увеличение в два раза меньшего из двух целых чисел. б) Напишите программу на языке Pascal по представленному в п. а) алгоритму.

Информатика

Ответы

Voshchula David393
Задание 1:

ответ: 150

a = ((35 - 5) / 6) * (28 + ((35 - 5)/6) -3) = 5 * (25 + 5) = 150Задание 2:

ответ: a=9, b=86

b = ((7 * 11 + 4) div 10) + 6 = (81 div 10) + 6 = 86a = (86 mod 10) + 3 = 6 + 3 = 9Задание 3:

ответ: 12

a = 15 - 6 * 2 = 33>15 ? нет => c = 15 - 3 = 12Задание 4:

ответ: 173

for k:=7 to 14 do  s:=s+2*ks = 5 + 2*(7+8+9+10+11+12+13+14) = 173Задание 5А:НачалоВвод a, ba>b ?если да, то Вывод b*2если нет, то Вывод a*2КонецЗадание 5Б:var a, b: integer;begin    readln(a,b);    if a>b then writeln(b*2) else writeln(a*2);end.
bandurinei
А) 1 *2^{0}+1 *2^{3} +1* 2^{2}+1* 2^{4}+1* 2^{5}+1* 2^{7} =1+4+8+16+32+128=189 степени расставлять с конца (начиная с нуля)
б) 112 (см. а)
в) деление в один большой столбик. если число четное, то в остатке 0, а если нечетное, то единица. число собирать с конца. 1100011101101
г) 10010100110 (см. в)
д) 10000101101
е) 10011010100 (см.в)
ж) 10101100000011
з) 27 (см. а)
и) 752

а)1^{7}0^{6}1^{5}1^{4}1^{3}1^{2}0^{1}1^{0}= 1*2^{0}+0*2^{1}+1*2^{2}+1*2^{3}+1*2^{4}+1*2^{5}+0*2^{6}+1*2^{7} вверху дописано
г) лучше делить столбиком, как в 1-м классе, но тут неудобно так писать, поэтому я распишу так.
1190/2=595 (ост. 0)
595/2=297 (ост.1)
297/2=148 (ост.1)
148/2=74 (ост. 0)
74/2=37 (ост.0)
37/2=18 (ост. 1)
18/2=9 (ост. 0)
9/2=4 (ост.1)
4/2=2 (ост.0)
2/2=1 (ост.0)
собираем с конца 10010100110

б)1^{6}1^{5}1^{4}0^{3}0^{2}0^{1}0^{0}=0*2^{0}+0*2^{1}+0*2^{2}+0*2^{3}+1*2^{4}+1*2^{5}+0*2^{6}=16+32+64=112
ж)11011/2=5505 (1)
5505/2=2752(1)
2752/2=1376(0)
1376/2=688(0)
688/2=344(0)
344/2=172(0)
172/2=86(0)
86/2=43(0)
43/2=21(1)
21/2=10(1)
10/2=5(0)
5/2=2(1)
2/2=1(0)
10101100000011
з)1^{4}1^{3}0^{2}1^{1}1^{0}=1*2^{0}+1*2^{1}+0*2^{2}+1*2^{3}+1*2^{4}=1+2+8+16=27
elenaowchinik4842
Эту задачу очень легко решить при логарифмов. Если при делении логарифма числа на логарифм пяти получится целое число, то искомое есть степень пятерки, а результат деления и есть показатель степени.

На примере: lg(125) / lg(5) = 3.  Так как 5³ = 125
lg(812) / lg(5) ≈ 4.16 поэтому 812 не явл. степенью 5-ки.

print "Введите число"
input A
S = log(A) / log(5)
if S = int(S) then
   print "Число ";А; "является степенью числа 5"
   print "Показатель степени "; S
else
   print "Число ";А; "не является степенью числа 5"
end if
end

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Задание 1. Определите значение переменной а после выполнения данного алгоритма: a:=28; b:=35; b:= (b-5)/6 a:=b*(a+b-3) Задание 2. Определите значение целочисленных переменных a и b после выполнения фрагмента программы: а :=7*11 + 4; b :=(a div 10)+ 6; a :=(b mod 10)+ 3; Задание 3. Определите значение переменной c после выполнения следующего фрагмента программы: a := 6 ; b := 15 ; a := b – a*2; if a>b then c := a + b else c := b – a; Задание 4. Определите, что будет напечатано в результате работы следующей программы: var s, k: integer; begin s:=5; for k:=7 to 14 do s:=s+2*k; write(s); Задание 5. а) Составьте алгоритм в виде блок-схемы на увеличение в два раза меньшего из двух целых чисел. б) Напишите программу на языке Pascal по представленному в п. а) алгоритму.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

platonovkosty
Смирнов_Андрей691
ella-rudenko
Nataliatkachenko1
Alekseevich1012
lavorenn
ayanrsadykov
Yelfimova-andrei
plv-57
aivanova
kryshtall2276
Роман_Гречина
Радецкая264
textildlavas21
info4632