Cоставить программу которая запрашивает у пользователя год его рождения и текущий год и выводит возраст пользователя.пример работы программы: в каком году ты родился? 1980 какой сейчас год? 2003 тебе в этом году 23 года
var a, b: integer; begin writeln('В каком году ты родился?'); readln(a); writeln('Какой сейчас год?'); readln(b); writeln('Тебе ', b - a, ' лет') end.
gardenstreet5
02.01.2021
ответ в файле .txt более полнее
asvirskiy26
02.01.2021
var X: array [1..10] of integer; a,s,i: integer; begin randomize; write('Хотите заполнить массив самостоятельно? (1) Или автоматически? (2)'); readln(s); case s of 1: begin writeln('Введите 10 элементов массива: '); for i:= 1 to 10 do readln(X[i]); a:=X[1]; for i:= 1 to 10 do if a < X[i] then a:=X[i]; writeln('Максимальный элемент: ',a); end; 2: begin writeln('Массив: '); for i:= 1 to 10 do begin X[i]:=random(101); write(X[i]:4); end; writeln; a:=X[1]; for i:= 1 to 10 do if a < X[i] then a:=X[i]; writeln('Максимальный элемент: ',a); end; end; end.
olofinskayae
02.01.2021
"1 Соберите данные по температуре. Важно, чтобы она измерялась в сходных условиях. Например, температура воздуха должна определяться по градуснику, находящемуся на одной и той же высоте от земли и с теневой стороны. Температуру больного человека желательно изменять в одно и то же время, например, с утра. Для повышения точности желательно также использовать одни и те же измерительные приборы. 2 Выберите, к каких единицах вы будете фиксировать температуру - в градусах Цельсия, Фаренгейта или кельвинах. Это зависит от целей измерения и используемого оборудования. 3 Начертите на бумаге двухмерную систему координат. По абсциссе будет определяться дата или время измерения температуры, а по ординате - градусы. Сделайте на них соответствующие отметки в виде шкалы. 4 Занесите в график свои данные. Для начала отметьте точки,которые по оси X будут соответствовать температуре в градусах, а по оси Y - дате измерения. Затем соедините получившиеся точки линиями. У вас получился график, показывающий изменение температуры."
begin
writeln('В каком году ты родился?');
readln(a);
writeln('Какой сейчас год?');
readln(b);
writeln('Тебе ', b - a, ' лет')
end.