Пожалуйста, помогите, нужно написать в Pascal ABC
10-11 класс
|
var
y,x,z,a,b:real;
begin
y:=(sin(3.13/6)+cos(0)+sin(3.14/2)+cos(3.14))/(sin(3.14)+cos(3.14*2)+cos(3.14/3));
writeln('Результат превого примера: ', y);
y:=(sqrt(abs(17.2/-11.8))+sin((1.15+8.32)/2))/(2*cos(1-3.14/6));
writeln('Результат второго примера: ', y);
writeln('Введите x: ');
readln(x);
writeln('Введите z: ');
readln(z);
a:=-3; b:=-5;
y:=(abs(b)-sqr(sin(x))+sqrt(1000)+cos(z))/(sqr(cos(x))+abs(a)+sin(z));
writeln('Результат третьего примера: ', y);
end.
Другие вопросы из категории
Нужно сделать 3 лабораторных работ по microsoft access.
Можно за определенную плату. О цене договоримся.
Если есть таки люди, то отпишите в этой теме, как можно с вами связаться.
Лучше всего будет - Почта или скайп.
Заранее спасибо!
>Зеленый цвет на компьютере с объемом страницы видеопамяти 125 Кбайт кодируется кодом 0010. Какова может быть разрешающая способность монитора?
Ребят если можно с полным решением.))))
первых двух чисел четна, то выведите эту сумму. Если сумма третьего и четвертого чисел четна и отрицательна, то выведите все четыре числа без изменения. Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих четырех чисел. Иначе, выведите суммы двух первых и двух последних чисел.
Читайте также
а первом фото 4 с процедурой, 8 с функцией.
На втором фото 8 с рекурсивной процедурой.
На вход программе подаются сведения о
телефонах всех сотрудников некоторого учреждения. В первой строке
сообщается количество сотрудников N, каждая из следующих N строк имеет
следующий формат:
<Фамилия> <Инициалы> <телефон>
где <Фамилия> – строка, состоящая не более чем из 20 символов, <Инициалы> - строка, состоящая не более чем из 4-х символов (буква, точка, буква, точка), <телефон> – семизначный номер, 3-я и 4, я, а также 5-я и 6-я цифры которого разделены символом «–». <Фамилия> и <Инициалы>, а также <Инициалы <телефон> разделены одним пробелом. Пример входной строки:
Иванов П.С. 555-66-77
Сотрудники
одного подразделения имеют один и тот же номер телефона. Номера
телефонов в учреждении отличаются только двумя последними цифрами.
Требуется написать как можно более эффективную программу, которая будет
выводить на экран информацию, сколько в среднем сотрудников работает в
одном подразделении данного учреждения.
нужно сделать в Pascal ABC
1)Составить программу вычисления в двумерном массиве минимального элемента, его номера и замены его на 100
2)Записать в файл последовательность доступа n действительных чисел. Найти разность первого и последнего компонентов файла
3)Составить программу, удаляющую из предложения букву "Е"
готового изделия, количество метров в рулоне. Помогите, нужно написать программу решения этой задачи в Паскале