помогите решить в паскаль варинат №3 задание 1

Ответ:

program xxxx;

uses crt;

var

m,n,k,o:integer;

begin

read(m);

read(n);

read(k);

o:=m*2+k;

end.

Объяснение:

сначала пользователь вводит количество побед, проигрышей, ничьих и считает количество набранных очков.