Question

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

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.