Пример программы на Pascal для вычисления значений переменных "k" и "f" по формулам:
program CalculateValues; var c: integer; d: real; k, f: real; begin writeln′Введитезначениепеременнойc(целоечисло):′'Введите значение переменной c (целое число): '′Введитезначениепеременнойc(целоечисло):′; readlnccc; writeln′Введитезначениепеременнойd(вещественноечисло):′'Введите значение переменной d (вещественное число): '′Введитезначениепеременнойd(вещественноечисло):′; readlnddd; k := 23*c + 8*d; f := 4*d + 7; writeln′Значениепеременнойk:′,k'Значение переменной k: ', k′Значениепеременнойk:′,k; writeln′Значениепеременнойf:′,f'Значение переменной f: ', f′Значениепеременнойf:′,f; end.
Эта программа сначала запрашивает у пользователя значения переменных "c" целоечислоцелое числоцелоечисло и "d" вещественноечисловещественное числовещественноечисло, затем вычисляет значения переменных "k" и "f" согласно указанным формулам и выводит результаты на экран.
Пример программы на Pascal для вычисления значений переменных "k" и "f" по формулам:
program CalculateValues;var
c: integer;
d: real;
k, f: real;
begin
writeln′Введитезначениепеременнойc(целоечисло):′'Введите значение переменной c (целое число): '′Введитезначениепеременнойc(целоечисло):′;
readlnccc;
writeln′Введитезначениепеременнойd(вещественноечисло):′'Введите значение переменной d (вещественное число): '′Введитезначениепеременнойd(вещественноечисло):′;
readlnddd;
k := 23*c + 8*d;
f := 4*d + 7;
writeln′Значениепеременнойk:′,k'Значение переменной k: ', k′Значениепеременнойk:′,k;
writeln′Значениепеременнойf:′,f'Значение переменной f: ', f′Значениепеременнойf:′,f;
end.
Эта программа сначала запрашивает у пользователя значения переменных "c" целоечислоцелое числоцелоечисло и "d" вещественноечисловещественное числовещественноечисло, затем вычисляет значения переменных "k" и "f" согласно указанным формулам и выводит результаты на экран.