Паскаль.

Родители Васи уехали в командировку на 7 дней и оставили ему на проживание 630 рублей. Сможет ли Вася на седьмой день купить себе компьютерную игру стоимостью 250 рублей, если в первый день он потратил n1 рублей, во второй - n2 рублей, в третий - n3 рубля, в четвертый - n4 рублей, в пятый - n5 рубля, в шестой - n6 рубль?

Question

Информатика

Лианка

7 марта, 15:15

Паскаль.

Родители Васи уехали в командировку на 7 дней и оставили ему на проживание 630 рублей. Сможет ли Вася на седьмой день купить себе компьютерную игру стоимостью 250 рублей, если в первый день он потратил n1 рублей, во второй - n2 рублей, в третий - n3 рубля, в четвертый - n4 рублей, в пятый - n5 рубля, в шестой - n6 рубль?

+5

Ответы (1)

Знаешь ответ?

Ильина · Answer 1

Var

n, n7:integer;

Begin

n7:=630;

Write ('n1 = '); ReadLn (n);

n7:=n7-n;

Write ('n2 = '); ReadLn (n);

n7:=n7-n;

Write ('n3 = '); ReadLn (n);

n7:=n7-n;

Write ('n4 = '); ReadLn (n);

n7:=n7-n;

Write ('n5 = '); ReadLn (n);

n7:=n7-n;

Write ('n6 = '); ReadLn (n);

n7:=n7-n;

if n7>=250 then WriteLn ('Сможет')

else WriteLn ('Не сможет')

End.