Семён - маляр, Николай - плотник, Илья - водопроводчик.
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.
Если в двоичном коде то
1101100
Var a: array[1..6] of integer;
i, k, d, v, n: integer;
begin
for i:=1 to 6 do
begin
write('Введите элемент массива под номером ', i, ' = ');
readln(a[i]);
end;
k:=0;
d:=0;
v:=0;
n:=6;
for i:=1 to n do
if a[i]=0 then
k:=k+1
else
if a[i]>0 then
d:=d+1
else
if a[i]<0 then
v:=v+1;
writeln('Количество нулевых = ', k);
writeln('Количество положительных = ', d);
writeln('Количество отрицательных = ', v);
end.
8.
Стихотворение в учебнике: зрительный; текстовая.
Картина в музее: зрительный; графическая.
Радиопередача: слуховой; звуковая.
Возраст...карте: зрительный; числовая.
Инф. в учебнике: зрительный; текстовая (+графическая).
Фильм: слуховой и зрительный; видеоинформация.
Термометр: зрительный; числовая.
9.
а)1,3,5
б)1,4,5
в)1,4,5
г)1,3,4