Предмет: Информатика,
автор: 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.
Похожие вопросы
Предмет: Алгебра,
автор: esengulov070707
Предмет: Математика,
автор: akylaina
Предмет: Биология,
автор: plazmaroma
Предмет: Алгебра,
автор: 89373693967
Предмет: Физика,
автор: mykatriin