Определить размер вознаграждения

@Анна Момот · Регистрация: 30.09.2013

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

Вознаграждения работникам фирмы выплачиваются в зависимости от стажа работы в таком размере: При стаже работы от 1 до 3 лет - 75% зарплаты; От 3 до 5 лет - 100% зарплаты; От 6 до 10 лет - 120%; Более 10 лет - 150 % зарплаты. При стаже работы менее одного года вознаграждение не выплачивается.
Определить размер вознаграждения при заданном стаже работы и размере зарплаты.

@AnDrOs96 · 07.10.2013, 19:09

Pascal

program rabota;
var s:integer;
zarplata,vuplata:real;
begin
writeln('Введите зарплату');
readln(zarplata);
writeln('Введите стаж работы');
readln(s);
For s:=0 to 1 do 
vuplata:=zarplata;
For s:=2 to 3 do
vuplata:=0.75*zarplata+zarplata;
For s:=4 to 6 do
vuplata:=2*zarplata;
For s:=7 to 10 do
vuplata:=1.2*zarplata+zarplata;
For s:=10 to 100 do
vuplata:=1.5*zarplata+zarplata;
 
writeln('vuplata sostavut',vuplata);
end.

Вроде так,если работает,мне спасибо!!!

@Анна Момот · 07.10.2013, 19:12 **[ТС]**

работает!) спасибо большое!

@AnDrOs96 · 07.10.2013, 19:18

Спасибо под моим сообщением нажми пожалуйста))

@Анна Момот · 07.10.2013, 20:17 **[ТС]**

можете написать блок-схему к этой задаче??

@AnDrOs96 · 07.10.2013, 20:24

Вот смотри сайт http://www.paslab.ru/blok-shema.php
вводи код туда и ввыйдет схема!Не знаю насколько она верная,сам не умею их писать!

@Анна Момот · 14.10.2013, 18:58 **[ТС]**

а можете написать эту же программу, только через сase of?

@Анна Момот 0 / 0 / 0 Регистрация: 30.09.2013 Сообщений: 22
		1
	Определить размер вознаграждения 07.10.2013, 18:31. Показов 959. Ответов 6 Метки нет (Все метки) Вознаграждения работникам фирмы выплачиваются в зависимости от стажа работы в таком размере: При стаже работы от 1 до 3 лет - 75% зарплаты; От 3 до 5 лет - 100% зарплаты; От 6 до 10 лет - 120%; Более 10 лет - 150 % зарплаты. При стаже работы менее одного года вознаграждение не выплачивается. Определить размер вознаграждения при заданном стаже работы и размере зарплаты. 0

@Анна Момот 0 / 0 / 0 Регистрация: 30.09.2013 Сообщений: 22
	07.10.2013, 19:12 [ТС]	3
	работает!) спасибо большое! 0

@AnDrOs96 22 / 22 / 7 Регистрация: 11.09.2013 Сообщений: 186
	07.10.2013, 19:18	4
	Спасибо под моим сообщением нажми пожалуйста)) 1

@Анна Момот 0 / 0 / 0 Регистрация: 30.09.2013 Сообщений: 22
	07.10.2013, 20:17 [ТС]	5
	можете написать блок-схему к этой задаче?? 0

@AnDrOs96 22 / 22 / 7 Регистрация: 11.09.2013 Сообщений: 186
	07.10.2013, 20:24	6
	Вот смотри сайт http://www.paslab.ru/blok-shema.php вводи код туда и ввыйдет схема!Не знаю насколько она верная,сам не умею их писать! 0

@Анна Момот 0 / 0 / 0 Регистрация: 30.09.2013 Сообщений: 22
	14.10.2013, 18:58 [ТС]	7
	а можете написать эту же программу, только через сase of? 0