Расстояние между двумя городами равно 362 км. Определи расстояние между изображениями этих городов на карте, если числовой масштаб карты равен 1:4000000.
(ответ округли до целых

{PascalABC}

Program Puzzle;

var  

 R,day:integer;  

 week:array[1..7] of string;

 i:integer;

 s:string;

begin

 week[7]:='Воскресенье';

 week[6]:='Суббота';

 week[5]:='Пятница';

 week[4]:='Четверг';

 week[3]:='Среда';

 week[2]:='Вторник';

 week[1]:='Понедельник';

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(200) end;

 writeln; writeln('ОК, Задумайте день недели (номер от 1 до 7)');

 writeln('Удвойте этот номер');

 writeln('Увеличьте результат на 5');

 writeln('Умножьте полученное число на 5');

 writeln('Теперь то, что получилось, умножьте на 10');

 writeln('Введите полученный результат'); readln(R);

 day:= round((R-250)/100);

 writeln('');

 case day of

   1..7: writeln('      Вы задумали ',week[day]);

   else writeln('Что-то пошло не так... Либо вы задумали не число между 1 и 7, либо ошиблись в рассчётах')

 end;

 writeln('');

end.

#include <iostream>
#include <cassert>

using namespace std;

void pie_price(int a, int b, int n)
{
assert((a >= 0) && (a <= 1000));
assert((b >= 0) && (b <= 99));
assert((n >= 1) && (n <= 1000));
double price = a * 1.0 + b / 100.0;
float res = price * n;
int kop = res * 100;
cout << "Rubles " << res << endl;
cout << "Kopeyks " << kop << endl;
}

int main()
{
int a, b, n;
cin >> a >> b >> n;
pie_price(a, b, n);
}