Предмет: Информатика,
автор: 444nastja19987
программа паскаль. Водим целое число - а; если оно делиться на 5ть, то должно выполняться по формуле cos^3a, если не делиться на 5ть то 3tg a
программа сама пишется через как то div, mod
Ответы
Автор ответа:
0
var a: integer;
begin
readln(a);
if (a mod 5 = 0) then
writeln((cos(a) * cos(a) * cos(a)):0:5)
else
writeln((3 * sin(a) / cos(a)):0:5);
end.
begin
readln(a);
if (a mod 5 = 0) then
writeln((cos(a) * cos(a) * cos(a)):0:5)
else
writeln((3 * sin(a) / cos(a)):0:5);
end.
Похожие вопросы
Предмет: История,
автор: vikuha6969
Предмет: Биология,
автор: abduvalisaliev777
Предмет: Қазақ тiлi,
автор: kucerovkirril
Предмет: История,
автор: alenka5alenka
Предмет: Алгебра,
автор: АлёнаАвчинко