Var r,L,S:real;
begin
read (r);
L:=2*3.14*r;
S:=4*3.14*r*r;
write('длина...=',L);
write('площадь...=',S);
End.
Паскаль
Program time ;
Var t : Integer;
Begin
WriteLn ('Введите время');
ReadLn (t) ;
If (t>=0) and (t<6) then
WriteLn ('Ночь') ;
If (t>=6) and (t<12) then
WriteLn ('Утро') ;
If (t>=12) and (t<18) then
WriteLn ('День') ;
If (t>=18) and (t<24) then
WriteLn ('Вечер') ;
End.
Лайк кста
2^i=256
отсюда i=8 бит=1 байт
I=20*20*1=400 байт или 0.39 Кбайт
Оперативная память. Именно тут хранится вся информация о работе, пока компьютер включен. Не путайте с Жестким Диском. На Жестком диске хранится долговременная информация.