Напишите программку для решения задачки. В видеоигре игрок выигрывает 50 очков,

Напишите программку для решения задачки. В видеоигре игрок выигрывает 50 очков, если он сбивает самолет,100 очков, если он сбивает ракету, 200 очков, если он сбивает спутник. Составьте программку, которая выведет на экран число очков игрока, который сбил А самолетов, В ракет и С спутников.

Задать свой вопрос
Диана Шульженкова
а на каком языке ??
Сема
Ща сделаю
1 ответ
Var
a, b, c, d:Integer;
begin
Writeln('Ведите сколько вы сбили самолётов:');
readln(a);
Writeln('Ведите сколько вы сбили ракет:');
readln(b);
Writeln('Водите сколько вы сбили спутников:');
readln(c);
a:=a*50;
b:=b*50;
c:=c*50;
d:=a+b+c;
writeln('У вас ', d, ' очков');
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт