FORTRAN 90
На паскаль переводится очень легко
program for_znanija
implicit none
real :: a,b,dx,x,f
integer :: k
print *,'Введите левую границу'
read *, a
print *,'Введите правую границу'
read *, b
print *, 'Введите шаг'
read *, dx
x=a
k=0
do while (x<=b)
print '(a,f5.2,a,f8.4)','При x=',x, ' значение функции f=',f
f=tan(x)
x=x+dx
enddo
end
На скриншоте тоже моя программа, но написана ранее, поэтому там есть небольшие изменения.
Справа проверка на работоспособность. Функция tg(x).
Ответ:
Ответ: 3 пути из города А в город И
Ответ:
<em><u>(см объединение)</u></em>
Объяснение:
AB\/A=A
A_B_AB\/A
0_0_0
0_1_0
1_0_1
1_1_1
16=2 в 4 степени, значит в сообщении о белом кар. -4 бита
24 округлям до 32 (в бол. сторону)=5 бит
Вот, QBasic
INPUT x
PRINT 3*x^6*x^2-7