По введенному с клавиатуры виду транспорта определить стоимость проезда

@hernia · Регистрация: 28.09.2014

Студворк — интернет-сервис помощи студентам

Тема «Условный и циклический оператор»
По введенному с клавиатуры виду транспорта (маршрутное такси-5руб,транвай-2руб, автобус-3руб, такси- 40руб) определить стоимость проезда для указанного количества людей в одном транспорте.

@Puporev · 28.09.2014, 11:48

Pascal

uses crt;
var n,s,w:integer;
begin
clrscr;
write('Введите количество пассажиров n=');
readln(n);
writeln('Выберите вид транспорта:');
writeln('1-маршрутное такси');
writeln('2-трамвай');
writeln('3-автобус');
writeln('4-такси');
readln(w);
if w=1 then writeln('s=',n*5)
else if w=2 then writeln('s=',n*2)
else if w=3 then writeln('s=',n*3)
else if w=4 then writeln('s=',n*40)
else writeln('Такого транспорта нет');
readln
end.

@hernia 2 / 2 / 0 Регистрация: 28.09.2014 Сообщений: 9
		1
	По введенному с клавиатуры виду транспорта определить стоимость проезда 28.09.2014, 10:58. Показов 1289. Ответов 1 Метки нет (Все метки) Тема «Условный и циклический оператор» По введенному с клавиатуры виду транспорта (маршрутное такси-5руб,транвай-2руб, автобус-3руб, такси- 40руб) определить стоимость проезда для указанного количества людей в одном транспорте. 0

Опции темы

По введенному с клавиатуры виду транспорта определить стоимость проезда

Решение