Задание в Excel или на языке программировнания?
"Говорильный" аппарат,
Модный гаджет,связи рад.
Фото,видео снимает,
На звонки он отвечает.
( Телефон)
К празднику, всегда "накрыт",
Полон явств и каждый сыт,
Я бюро и секретер,
Есть компьютерный размер.
<span> ( Стол)
</span>Важных данных я хранитель,
Информации носитель,
Гибкая,так что же это?
Я магнитная ?(Дискета)
Я блокнот и память я,
Есть и электронная.
Записи я все веду,
Всё фиксирую и жду.
<span> </span> (Записная книжка)
Не пищу и не шуршу,
А с компьютером-дружу.
Я курсором управляю,
И командам помогаю.
(Мышка)
Осенью,я всех встречаю.
Летом,просто отдыхаю.
Весь учебный год-учу,
Дарить знания хочу.
(Школа)
var r,h:real;
Begin
read(r,h);
writeln('S=',pi*r*2*h/3);
End.
128=2^7 значит 7 бит весит 1 символ
80*60=4800 символов
4800*7=33600 бит=4200 байт=4,1 килобайт
Var a:array[1..30] of integer;
i:integer;
begin
for i:=1 to 30 do
begin a[i]:=2*i;
write(a[i],' ');
end;
end.