Задать вопрос
12 января, 07:43

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

+4
Ответы (1)
  1. 12 января, 09:39
    0
    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.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программу для решения задачи. В видеоигре игрок выигрывает 50 очков, если он сбивает самолет, 100 очков, если он сбивает ракету, ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы