3 задание (Все готовые лабы по паскалю)

Описание файла

Файл "3 задание" внутри архива находится в следующих папках: 1kyrs_1semestr_paskal_labworks, 3 лабораторка. Документ из архива "Все готовые лабы по паскалю", который расположен в категории "лабораторные работы". Всё это находится в предмете "информатика" из первого семестра, которые можно найти в файловом архиве МГТУ им. Баумана. Не смотря на прямую связь этого архива с МГТУ им. Баумана, его также можно найти и в других разделах. Архив можно найти в разделе "лабораторные работы", в предмете "информатика" в общих файлах.

Онлайн просмотр документа "3 задание"

Текст из документа "3 задание"

3. Дано натуральное число n и действительное число x. Вычислить:



  • Текст программы:

var

k, m, n: integer;

i, s, x: real;

begin

write ('n=');

readln (n);

write ('x=');

readln (x);

i:=0;

s:=0;

for k:=7 to n do begin

for m:=k to n do

i:=(x+k) /m;

s:=s+i

end;

writeln ('s=',s);

readln; readln;

end.

  • Исходные данные: n=8 and x=3; Результат: s=2.6250000000E+00


Для добавления файла нужно быть зарегистрированным пользователем. Зарегистрироваться и авторизоваться можно моментально через социальную сеть "ВКонтакте" по кнопке ниже:

Войти через
или

Вы можете зарегистрироваться стандартным методом и авторизоваться по логину и паролю с помощью формы слева.

Не забывайте, что на публикации файлов можно заработать.