Пожаловаться
- 01.02.2015 08:13
- Информатика
- remove_red_eye 17989
- thumb_up 17
Ответы и объяснения 1
1.
Var x,y: real;
Begin
writeln ('Введите число х');
readln (x);
y:=(x*x*x-2*x+1)/(x*x*x*x+5)+3*x*(x-10);
writeln ('y = ',y);
End.
2.
Var c,x,z: real;
Begin
writeln ('Введите стоимость товара');
readln (x);
writeln ('Введите количество кг товара');
readln (c);
z:=c*x;
writeln ('За покупку нужно заплатить ', z,' рублей');
End.
3.
Var N,N1: real;
Begin
Writeln ('Введите расстояние между городами');
readln N);
N1:=N-0.3*N;
writeln ('Осталось проехать ', N1,' км ');
End.
Var x,y: real;
Begin
writeln ('Введите число х');
readln (x);
y:=(x*x*x-2*x+1)/(x*x*x*x+5)+3*x*(x-10);
writeln ('y = ',y);
End.
2.
Var c,x,z: real;
Begin
writeln ('Введите стоимость товара');
readln (x);
writeln ('Введите количество кг товара');
readln (c);
z:=c*x;
writeln ('За покупку нужно заплатить ', z,' рублей');
End.
3.
Var N,N1: real;
Begin
Writeln ('Введите расстояние между городами');
readln N);
N1:=N-0.3*N;
writeln ('Осталось проехать ', N1,' км ');
End.
Пожаловаться
- 02.02.2015 08:15
- thumb_up 43
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы