Технология ( урок) по другому труд
Var a:array[1..15] of integer; n:integer; i,k:real;
begin
writeln('введите начальное значение');
readln(i);
writeln('введите шаг изменения');
readln(k);
writeln('введите кол-во элементов');
readln(n);
while n<>0 do begin
writeln(i,' драхм = ',i*1.77185,'г = ',i*0.06249,' унций');
n:=n-1;
i:=i+k;
end;
end.
Дано:
I = 450
K = 150
N = ?
Решение:
N=I/K
N=450/150=3 бита
<span>1) a=число 376 четное, b=</span><span>число 376 трехзначное: a & b
2) a=зимой дети катаются на коньках, b=</span><span>зимой дети катаются на лыжах: a | b
3) a=новый год мы встретим на даче, b= </span><span>новый год мы встретим на Красной площади: a | b
4) a=солнце движется вокруг земли: ¬a
5) a=земля имеет форму шара, b=шар из космоса кажется голубым: a & b
6) a=был урок математики, b=старшеклассники отвечали на вопросы учителя, c=</span><span><span>старшеклассники</span> писали самостоятельную работу: a & b & c</span>