Program zz;
var i,n,m:integer;
begin
readln(n,m);
for i:=1 to n do
write('?') ;
for i:=1 to m do
write('!') ;
end.<span>
</span>
Дано:
K = 800*600 = 480 000
I = 24 бит (т.к. в RGB на каждую составляющую цветовой модели отводится 8 бит, а составляющих 3: красный цвет, зеленый и синий. Т.е. 3*8 = 24)
Найти:
V - ?
Решение:
V = K*I
V = 480 000 * 24 бит = 11 520 000 бит / 8 = 1 440 000 байт / 1024 = 1 406.25 Кбайт
Ответ: 1406.25 Кбайт
Program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
write ('Введите количество дюймов: ');
readln(d);
s := d*m;
writeln (d, ' дюймов = ', s, ' сантиметров')
end.
Упрощенный вариант:
program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
readln(d);
s := d*m;
writeln (s)
end.
Бр-бортовой компьютер работает
вс1-вспомогательный бр. 1 работает
вс2-вспомогательный бр. 2 работает
лог. формулы
(бр или (вс1 и вс2)) - автопилот работоспособен
( (не бр) и ( (не вс1) или (не вс2) ) ) -автопилот не работоспособен