Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Программа функций

Автор: Данил 26.05.2004 15:47

написать программу функций : Пусть дано 10 целых чисел , которые вводятся по одному . получит сумму из тех, которые меньше по абсолютному значению квадрата порядкового номера вводимого числа.

Автор: virt 26.05.2004 15:57

Код
sum:=0;
for i:=1 to 10 do
begin
  read(x);
  if abs(x)<i*i then sum:=sum+x;
end;
writeln(sum);

Автор: Altair 26.05.2004 19:08

Что-то у вас название темы не хорошее sad.gif Может переименуете сами ?

Автор: Dimonchick 26.05.2004 19:25

Люди, помогите написать на Паскале корень пятой степени.

Автор: BlackShadow 26.05.2004 22:34

x^y = Exp(y*ln(x));
x^(1/5) = Exp(ln(x)/5);
Из школьной математики smile.gif