Практическая работа по информатике Паскаль

Практическая работа.

1. Саша спросил Сережу: "Сколько тебе лет?"

Сережа ответил : "Если бы число моих лет увеличить в 3 раза, а потом уменьшить на 17, то мне было бы 16 лет" . Сколько лет Сереже?

Обычно решение таких зада начинается "с конца". Количество лет, которое было бы Сереже (16), нужно увеличить на 17: 16+17=33. Затем надо уменьшить в3 раза: 33/3=11. ответ 11.

В языке Паскаль:

program Serg; {название программы}

var a, b, c : integer; {задаем переменные, целые так как кол-во лет берем целое значение}

begin

write ('Введите число лет, которое было бы Сереже '); {вывод на экран подсказки того что надо ввести}

readln (a); {вывод с клавиатуры переменной а}

b:= a+17; {из условия} // можно a:=a+17;

c:=b div 3; {из условия} a:=a div 3$

writeln ('Сереже ', c, ' лет') {вывод ответа на экран} вместо "с" "а"

end.

не забываем ставить ; Можно использовать только одну переменную "а" ничего не изменится. переменную а можно было задать в программе а не с клавиатуры как в данном случае.

сделайте самостоятельно:

1. Помогите Саше. Ему бабушка даст денег только в том случае если он угадает сколько она хочет ему дать. Если эту сумму увеличить в 4 раза, затем вычесть 2т. р и разделить на 40 то получится 100 р.

2. Иван-дурак пришел к царю просить руки его дочери. Царь решил проверить Ивана и задал ему вопрос: на какую работу выгоднее устроится. Если работать в течении 10 дней. На первой работе платят по 500 р. в день идти до нее пешком, на второй - заработная плата 5.5 т., ехать на автобусе, стоимость которого 30р. Иван выбрал второй вариант. Оказался ли он прав? (подсказка если надо ехать на автобусе приходится два раза)

3. Найти х. Если извлечь корень квадратный, прибавить к нему 7, и разделить на 5, то получится число 2.