Помогите СРОЧНО пожалуйста!!!Напишите программы ** языке Паскаль Задача1.Составить...

0 голосов
29 просмотров

Помогите СРОЧНО пожалуйста!!!Напишите программы на языке Паскаль
Задача1.Составить программу для расчета z=2.5sin x^2+x^3 Число х вводится с клавиатуры.
Задача 2.Задать 3 натуральных числа . Являются ли их сумма четным числом
Задача 3.Напечатать все делители натурального числа N.
ЗАРАНЕЕ СПАСИБО


Информатика (15 баллов) | 29 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

//1
begin
var x:=readreal('Введите x: ');
write ('z=', 2.5*sin(sqr(x))+x*x*x);
end.

//2
begin
write (((readinteger('Введите 3 нат. числа: ')+readinteger+readinteger) mod 2)=0);
end.

//3
begin
var n:=readinteger ('Введите n: ');
for var i:=1 to  n do
if (n mod i)=0 then print (i);
end.

(3.8k баллов)
0

Это комплимент?