Не могу решить легкое задание по алгоритмам. (9кл.).

@Liftlab · Регистрация: 25.03.2011

Решите пожалуйста)

Прикрепляю фото с заданиями:

Не могу решить легкое задание по алгоритмам. (9кл.).

Спасибо заранее)

@Liftlab · 25.03.2011, 17:38 **[ТС]**

Помогите пожалуйста!!

@marshal · 25.03.2011, 17:48

2 вариант второе задание
var

Pascal

i,s:integer;
begin
for i:=100 to 200 do
if i mod 17=0 then s:=s+i;
writeln(s);
end.

Блок-схему сами по принципу 1 задания этого же варианта.
1 задание 1)

Pascal

uses crt;
var k,i:integer;
begin
k:=2;
repeat
writeln(k);
k:=k+1;
until k>=200;
end.

Добавлено через 1 минуту
2)

Pascal

uses crt;
var r:integer;
begin
for r:=10 downto 1 do
writeln(r);
end.

2)-вывести натуральные числа от 10 до 1(что сложного!?)

Добавлено через 3 минуты
1 вариант

Pascal

uses crt;
var x,y,k:integer;
begin
x:=1;y:=8;
repeat
y:=y-x;
k:=k+1;
until y<=x;
writeln(k);
end.

@Liftlab · 25.03.2011, 19:36 **[ТС]**

Да нет, не трудно. Просто делаю процентов 80 номера а потом на какой-нибудь чуши запарываюсь)) Решил перестраховаться) Огромное спасибо!

Добавлено через 44 минуты
А вот задачу которая во 2ом варианте, (От M=1 до 10) Как правильно написать?

For M:=1 to 10 do
Begin
T:=M=1
F:=M+2
R:=F/T
Z:=X^M
A:=R*Z
Writeln (A);
End.

Так?

И в 1ом варианте сколько будет циклов k, И какая должны быть схема (1 задание)

@Liftlab 0 / 0 / 0 Регистрация: 25.03.2011 Сообщений: 3
		1
	Не могу решить легкое задание по алгоритмам. (9кл.). 25.03.2011, 17:27. Показов 881. Ответов 3 Метки нет (Все метки) Решите пожалуйста) Прикрепляю фото с заданиями: Спасибо заранее) 0

@Liftlab 0 / 0 / 0 Регистрация: 25.03.2011 Сообщений: 3
	25.03.2011, 17:38 [ТС]	2
	Помогите пожалуйста!! 0

@Liftlab 0 / 0 / 0 Регистрация: 25.03.2011 Сообщений: 3
	25.03.2011, 19:36 [ТС]	4
	Да нет, не трудно. Просто делаю процентов 80 номера а потом на какой-нибудь чуши запарываюсь)) Решил перестраховаться) Огромное спасибо! Добавлено через 44 минуты А вот задачу которая во 2ом варианте, (От M=1 до 10) Как правильно написать? For M:=1 to 10 do Begin T:=M=1 F:=M+2 R:=F/T Z:=X^M A:=R*Z Writeln (A); End. Так? И в 1ом варианте сколько будет циклов k, И какая должны быть схема (1 задание) 0

Опции темы