Приветствую Вас, Гость! Регистрация RSS

<Uzh.Soft/>

Воскресенье, 19.05.2024
Главная » 2012 » Декабрь » 26
Программа для вычисления функции F(x)=sin(x)+tg(x) на отрезке [a,b) с шагом h. Pascal
  1. var a,b,i,h,f:real;
  2.  
  3. begin
  4.   write('Введите числа a, b, h разделяя их пробелом: ');
  5.  
  6.   readln(a, b, h);
  7.  
  8.   i:=a;
  9.   while (i<b) do
  10.    ... Читать дальше »
Категория: Простые примеры | Просмотров: 2588 | Добавил: is | Дата: 26.12.2012 | Комментарии (0)

Вывести все нечётные числа из отрезка [A,B]. Pascal
  1. var A,B,i: integer;
  2.  
  3. begin
  4.   write('Введите два целых числа, разделяя их пробелом: ');
  5.  
  6.   readln(A, B);
  7.  
  8.   for i:=A to B do
  9.     if i mod 2 <>&n ... Читать дальше »
Категория: Простые примеры | Просмотров: 1761 | Добавил: is | Дата: 26.12.2012 | Комментарии (0)