Предмет: Информатика,
автор: mitkoa25121963A
Маленький Вася пошел в зоопарк.Там на пруду он увидел одну цаплю,несколько гусей и вдвое больше овец.Всего Вася насчитал n ног.Помоги Васе определить,сколько гусей и овец на пруду
Ответы
Автор ответа:
0
Написано на Pascal:
Program Lake;
Var a, b, n: Integer;
Begin
WriteLn('n = ');
ReadLn(n);
If n < 2 Then
WriteLn('Error!')
Else
Begin
n := n - 2;
a := n div 3;
b := a * 2;
WriteLn('На пруду ',a , ' гусей и ',b , ' овец.');
End;
ReadLn;
End.
Program Lake;
Var a, b, n: Integer;
Begin
WriteLn('n = ');
ReadLn(n);
If n < 2 Then
WriteLn('Error!')
Else
Begin
n := n - 2;
a := n div 3;
b := a * 2;
WriteLn('На пруду ',a , ' гусей и ',b , ' овец.');
End;
ReadLn;
End.
Похожие вопросы
Предмет: История,
автор: vitamandrenko
Предмет: Английский язык,
автор: Sultan0Aitkarim
Предмет: Химия,
автор: belpv583
Предмет: Алгебра,
автор: 89373693967
Предмет: Физика,
автор: mykatriin