задача-решить - Паскаль, Turbo Pascal, PascalABC.NET

Pikachy · 26.02.2012, 19:14

найти произведение двузначных чисел, кратных 4 не больших 85

Arhangel7 · 26.02.2012, 20:14

Код:

var
i,n:integer;
begin
n:=1;
for i:=10 to 85 do
if i mod 4 = 0 then n:=n*i;

или

Код:

var
i:integer;
n:int64;
begin
n:=1;
for i:=10 to 85 do
if i mod 4 = 0 then n:=n*i;

Poma][a · 26.02.2012, 21:35

Цитата:

задача-решить

уже бегу, [цензура]

26.02.2012, 19:14	#1
Pikachy Новичок Джуниор Регистрация: 26.02.2012 Сообщений: 1	задача-решить найти произведение двузначных чисел, кратных 4 не больших 85

26.02.2012, 20:14	#2
Arhangel7 Пользователь Регистрация: 27.02.2010 Сообщений: 90	Код: `var i,n:integer; begin n:=1; for i:=10 to 85 do if i mod 4 = 0 then n:=ni;` или Код: `var i:integer; n:int64; begin n:=1; for i:=10 to 85 do if i mod 4 = 0 then n:=ni;` как-то так Последний раз редактировалось Stilet; 26.02.2012 в 21:10.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Задача интересная, но решить не могу	pashka_dos	Паскаль, Turbo Pascal, PascalABC.NET	5	27.12.2011 15:20
Задача с УКАЗАТЕЛЯМИ, ПОМОГИТЕ РЕШИТЬ!	RomT24	Помощь студентам	1	06.06.2009 15:15
Задача по массивам. Срочно решить	Baby33	Паскаль, Turbo Pascal, PascalABC.NET	2	20.01.2009 14:09
Задача. Как решить ?	littlecoder	Общие вопросы Delphi	12	16.12.2008 01:13
Сложная задача....можно ли решить?	Pleksy	Microsoft Office Excel	1	23.02.2008 05:27