У таблиці містяться відомості
про заробітну плату
робітників. За якою
формулою можна порахувати
річні виплати (формулу
необхідно прописати у
комірку G3 та скопіювати у
діапазон G4:G6)? Врахуйте до
суми премію 10% від річних
виплат.
​

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

program ssd;

  uses crt,graph;

  var       d,m: integer;

  begin

  clrscr;

  initgraph(d,m,'');

  arc(200,200,360,180,50);

  line(150,200,250,200);

  readkey; closegraph;

  end.

1 байт/с = 23 бит/с = 8 бит/с; 1 кбит/с = 210 бит/с = 1024 бит/с; 1 мбит/с = 210 кбит/с = 1024 кбит/с; 1 гбит/с = 210 мбит/с = 1024 мбит/с.

var m,r: real;

begin

writeln('вычисление расстояния между населенными пунктами.') ; writeln('ведите исходные данные: '); writeln('масштаб карты (количество километров в одном сантиметре)  > ');

read(m); writeln('расстояние между двумя точками, изображающими населенные пункты (см)  > ');

read(r); writeln('расстояние между населенными пунктами ', m*r,' км.');

end.