Найти сумму целых положительных чисел

@damir.93dj · Регистрация: 24.11.2010

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

1)Найти сумму целых положительных чисел из промежутка от а до б кратное четырём. Помогите пожалуйста) просто мне на отчёт я сам не успеваю ((( несколько задач)

2)Известны данные о 16-ти сотрудникахфирмы :фамилия и отношение к воинской службе(военнообязанный или нет). Напечатать фамилии всех военнообязанных сотрудников.

3)Известно число жителей проживающих в каждом доме улицы. Нумерация домов проведена подряд. Дома с нечётными номерами расположены на одной стороне, чётные на другой стороне улицы.На какой стороне улицы проживает больше жителей?

4)Даны 2 натуральных числа выяснить является ли хоть одно из них палиндромом(перевёртышем) тоесть таким числом десятичная запись которого читается одинаково слева на право и справо на лево.(определить функции позволяющие распозновать числа палиндромы. Очень прошу вас сделайте пожалуйста))) просто я на отчёт не успеваю(

@Dekio · 25.11.2010, 20:48

Pascal

program n1;
var
i,a,b,s :integer;
begin
s:=0;
writeln('Введите а, b');
readln(a,b);
for i:=a to b do
if i mod 4=0 then
s:=s+i;
writeln(s);
end.

@Шутка · 25.11.2010, 21:53

Pascal

1
2
3

[QUOTE]
[B]s:=s+1;[/B]
[/QUOTE]

Pascal

var
n,i,p,n2:integer;
s2,s:string;
begin
readln(n);
str(n,s);
 for i:=length(s) downto 1 do begin
  s2:=s2+s[i];
 end;
val(s2,n2,p);
 if n=n2 then writeln('palindrom')
  else writeln('ne palindrom');
end.

@damir.93dj 1 / 1 / 0 Регистрация: 24.11.2010 Сообщений: 7
		1
	Найти сумму целых положительных чисел 25.11.2010, 20:30. Показов 1245. Ответов 2 Метки нет (Все метки) 1)Найти сумму целых положительных чисел из промежутка от а до б кратное четырём. Помогите пожалуйста) просто мне на отчёт я сам не успеваю ((( несколько задач) 2)Известны данные о 16-ти сотрудникахфирмы :фамилия и отношение к воинской службе(военнообязанный или нет). Напечатать фамилии всех военнообязанных сотрудников. 3)Известно число жителей проживающих в каждом доме улицы. Нумерация домов проведена подряд. Дома с нечётными номерами расположены на одной стороне, чётные на другой стороне улицы.На какой стороне улицы проживает больше жителей? 4)Даны 2 натуральных числа выяснить является ли хоть одно из них палиндромом(перевёртышем) тоесть таким числом десятичная запись которого читается одинаково слева на право и справо на лево.(определить функции позволяющие распозновать числа палиндромы. Очень прошу вас сделайте пожалуйста))) просто я на отчёт не успеваю( 0

	25.11.2010, 21:53

Опции темы

Найти сумму целых положительных чисел

Решение