ВВ
Вархуил Вархуилов

PASCAL: Помогите составить программу, в которой переменная вычисляется по a+2b, если A нечетное, и 3ab, если A четное...

АС
Анастасия Соболевская

uses crt;
var
a,b: integer;
begin
readln(a,b);
if a mod 2 = 0
then writeln(3*a*b)
else writeln(a+2*b);
end.

Похожие вопросы
Помогите составить программу в С++ или Pascal (а лучше и там и там)
какая будет функция четная или нечетная 1/х (х-2) какая будет функция четная или нечетная 1/х (х-2)
Составить программу по информатике по программе Pascal ABC
Составить программу в Pascal...
Помогите составить программу в Pascal
Составить программы в pascal
четной или нечетной будет сумма двух четных чисел
Составить Pascal программу
Pascal .Помогите составить программу на яззыке Pascal. (фото)
Pascal .Помогите составить программу на яззыке Pascal (фот. о)