С++ 1. Задача ANKETA

Составить программу ANKETA, которая вводит с клавиатуры

анкетные данные пользователя программы (фамилия, имя,

отчество, пол, дата рождения, адрес, номер телефона,

место учебы, класс, хобби) и выводит их

на экран в отформатированном виде.

Пример работы программы:

Фамилия?= Билл

Имя?= Гейтс

Отчество?= Иванович

Пол?= мужской

Дата рождения?= 1.01.1900

Адрес?= One Microsoft Way, 1, NY, USA

Номер телефона?= 1-2-3-4-5

Место учебы?= -

Класс?= -

Хобби?= программирование

<и далее с первой строки экрана>

А Н К Е Т А

Фамилия Имя Отчество

Гейтс Билл Иванович

Пол Дата рождения Номер телефона

мужской 1.01.1900 (093)839 33 55

Адрес

One Microsoft Way, 1, NY, USA

Место учебы Класс



Хобби

программирование

1. F(x) = x^2. 
Что происходит в программе? Сначала i = 0, затем, пока F(i) = i^2 меньше K, i увеличивается на 1, и в конце выводится i.
Цикл прерывается тогда, когда i^2 станет не меньше K.

Итого, программа выводит наименьшее число, квадрат которого не меньше K.
При K = 18 это происходит при i = 5. Такой же результат будет для всех 16 < K <= 25, это 25 - 16 = 9 чисел.

2. Тут начало похожее: в i появляется наименьшее число, для которого f(i) не меньше k. Затем, если f(i) - k <= f(i - 1), выводится i, иначе i - 1.
Это условие не очень удобное, перепишем так: если k >= f(i) -  f(i - 1), то выводим i, иначе i - 1.

f(i) = 3i^2 - 2i

Для k = 12 выведется 2: f(3) = 21, но 12 < f(3) - f(2) = 21 - 8 = 13.

2 выведется, если:
- i = 2, при этом k >= f(2) - f(1)
- i = 3, и k < f(3) - f(2)

f(1) = 1
f(2) = 8
f(3) = 21

Первый случай: 1 < k <= 8, при этом k >= 8 - 1. Подходят k = 7 и k = 8.
Второй случай. 8 < k <= 21, при этом k < 21 - 8. Подходят k = 9, 10, 11, 12.

Всего 6 чисел.

3. По аналогии с первым, выводится наименьшее натуральное i, для которого f(i) >= g(k). Для k = 14 g(k) = g(14) = 71, и i = 5 (5 в кубе не меньше 71, а 4 в кубе - меньше 71). Нужно найти такое целое k, для которого
g(k) <= 5^3
g(k) > 4^3

64 < 5k + 1 <= 125
63 < 5k <= 124
13 <= k <= 24
k = 13.

№1. Вычисление гипотенузы прямоугольного треугольника по двум катетам:

program znanija
var 
  a,b: real;
  c: real; 
begin 
  write ('Введите длины катетов.'); 
  readln (a,b); 
  c:=sqrt(a*a+b*b); 
  writeln ('Гипотенуза треугольника равна:', c); 
end. 

№2. Вычисление площади треугольника по длинам сторон:

program znanija
var
  a, b, c, p, s : real;
begin
  write ('Введите длины сторон.');
  read (a, b, c);
  p:=(a + b + c)/2;
  s:=sqrt(p*(p - a)*(p - b)*(p - c));
  writeln ('Площадь треугольника равна:', s);
end.