Написать программу на паскале, пожалуйста, срочно надо
5-9 класс
|
var x,y:real;
begin
writeln('Введите x');
readln(x);
if x>0 then y:=cos(x) else y:=sin(x);
writeln(y);
readln;
end.
Другие вопросы из категории
ут не Валерием, а студента географического института зовут не Леонид. Михаил учится не на историческом факультете. Андрей не пианист и не биолог. Валерий учится не на физическом факультете, а ударник - не на историческом. Леонид играет не на контрабасе. На каком инструменте играет Валерий и на каком факультете он учится? --------------------------- Логическая задача, которая решается таблицой.. Нарисуйте таблицу в пэинте если не сложно, или как не будь объясните так...
сли на странице размещается 40 строк по 60 символов в каждой строке, а для хранения одного символа требуется 8 битов?
Читайте также
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
Напишите программу, которая в последовательности целых чисел
вычисляет сумму всех чисел, которые кратны 6 или 11. Программа получает на вход
целые числа, количество введённых чисел неизвестно, последовательность чисел
заканчивается числом 0 (0 – признак окончания ввода, не входит
в последовательность).
Количество чисел не превышает 1000. Введённые числа по
модулю не превышают 30 000.
Программа должна вывести одно число: сумму всех чисел,
которые кратны 6 или 11.
Нужно написать программу, которая выводит на экран все двухзначные числа, делящиеся на 3 или на 5 (использовать операции целочисленного деления div или mod)
Дана строка. Верно ли, что второе слово начинается на ту же букву, которой заканчивается третье слово?