Вводится 20 чисел от 1 до 20. Если число четное,то вывести его синус,если нечетное то косинус.

Ответы:
Darya Bubyr
21-01-2014 09:01

var ar:array[1..20] of integer;i:integer;begin;for i:=1 to 20 dobegin;readln(ar[i]);if (ar[i]>20) or (ar[i]<1) then exit;if ar[i] mod 2=0 then writeln(sin(ar[i])) else writeln(cos(ar[i]));end;end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Аделия Середина

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Вводится 20 чисел от 1 до 20. Если число четное,то вывести его синус,если нечетное то косинус.» от пользователя Аделия Середина в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!