Мальчик купил в магазине n порций мороженого по цене 30 рублей и k плиток шоколада по цене 72 рубля. сколько всего потратил мальчик? нужно написать на языке паскаль

Program Itogo;
Var a,b,c,d,e: Integer;
Begin
Writeln (' Введите количество порций мороженого ');
Readln(a);
Writeln (' Введите количество плиток шоколада ');
Readln(b);
c:=a*30;
d:=b*72;
e:=c+d;
write(' Вы потратили ' , e);
End.

1.                                                    

program raf105;

var  

 i: integer;

begin

 for i:=50 to 57 do

   writeln(i,' ');

end.

2.                                                    

program raf105;

var  

 i,c,sum: integer;

 sari: real;

begin

 for i:=6 to 14 do

 begin

   sum:= sum+i*i;

   c:= c+1;

 end;

 sari:= sum/c;

 writeln('Среднее арифметическое: ',sari);

end.

3.                                                    

program raf105;

var  

 i,n,sum: integer;

begin

 write('n = ');

 readln(n);

 for i:=1 to n do

   if i mod 2 = 0

     then sum:= sum+i*i;

 writeln('Сумма квадратов чётных чисел: ',sum);

end.

                                                     PascalABC 3.4.2

1.

2-й игрок получает информацию о том, на какую клетку походил первый. Так как это уже третий ход первого, значит перед этим были заняты 4 клетки (два хода первого + два хода второго). Это значит, что перед 3-м ходом первого свободны 25 - 4 = 21 клетка. Для кодирования информации об одной из 21 клеток нужно 5 бит (решаем неравенство N<=2^i, подбирая минимально возможное значение i)
ответ: 5 бит

2.

1/512 Мбайт = (1024/512) Кбайт = 2 Кбайт = 2048 байт
Всего 2048 символов, значит, для кодировки одного символа нужен 1 байт .
1 байт = 8 бит
С бит можно закодировать 2^8=256 символов
ответ: размер алфавита 256 символов

3.

Для кодировки каждого символа 16-символьного алфавита нужно 4 бит
(решаем неравенство 16<=2^i, подбирая минимально возможное значение i). Далее, одна страница текста содержит 30 * 50 = 1500 символов.
6 страниц текста содержат 6 * 1500 = 9000 символов.
Весь текст содержит 9000 символов * 4 бит = 36000 бит = 4500 байт (приблизительно 4,39 Кбайт)

ответ: 4500 байт

 

Примеры:

  - система автоматической терморегуляции поддерживает заданную температуру (управляющее устройство получает информацию от температурных датчиков, обрабатывает ее - сравнивает реальную температуру с заданной, и передает команды нагревательному элементу - усилить или уменьшить нагрев) - например в кондиционерах
  - система программного управления обеспечивают стирку в стиральной машине в заданном режиме
  - система записи звука в диктофоне
  - система управления станком с ЧПУ (числовым программным управлением)