Var a: Integer; s: String;У яких операторах правильно виконано перетворення типів? *

a := StrToInt (s);

s := IntToStr(s);

s := StrToInt (a);

s := IntToStr(a);

​

var a, b,c,k,d,e,g,h : integer;

var f : integer;

begin

writeln('Введите стоимости билета за проезд до первой, до второй и до конечной станции через пробел :');

readln(a,b,c);

writeln('Введите сколько рублей должна быть конечная выручка : ');

readln(k);

d := 10*a;

e := 20*b;

g := 20*c;

h := d+e+g;

f := h div k;

writeln(f, ' Рейсов нужно совершить нужно совершить.');

end.

Лог :

Введите стоимости билета за проезд до первой, до второй и до конечной станции через пробел :

1

1

1

Введите сколько рублей должна быть конечная выручка :  

50

1 Рейсов нужно совершить нужно совершить.

Чем могу, тем
Информатика в современном мире имеет огромнейшее значение. Технологии буквально везде, соответственно нужно учиться с ними работать. Компьютеры сейчас есть в каждом офисе, каждой школе, в медицине используют роботов-хирургов, и это ещё не всё. Каждый человек должен научиться выполнять простейшие действия, хотя бы научиться работать с компьютером, это позволит значительно облегчить ряд повседневных действий..Чего стоят обычные браузерные поисковики, стоит только задать вопрос и сразу же получишь на него ответ. Это очень удобно, не так ли?
(дальше у меня кончилась фантазия, однако материал для размышлений у вас есть)