1. x = 5
2. y = 4
3. x = 5 + 4 = 9
4. y = 9 - 4 = 5
5. x = 9 - 5 = 4
6. s = 4 div 2 + y mod 3 = 2 + 2 = 4
Readln как и read вводит переменную командой read (x); также и readln (x); но перед этим надо в var внести переменную x
Program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
write ('Введите количество дюймов: ');
readln(d);
s := d*m;
writeln (d, ' дюймов = ', s, ' сантиметров')
end.
Упрощенный вариант:
program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
readln(d);
s := d*m;
writeln (s)
end.
10+7=17
роде правильно !!!!!!!!