Выяснить, делится ли одно число на другое

@Григорьева · Регистрация: 05.01.2012

Даны два натуральных числа a и b. Выяснить, делится ли а на b?

помогите,плиз)

@Фаер · 05.01.2012, 20:17

Pascal

Var a,b:integer;
Begin
 
Write ('a=');
Readln (a);
Write ('b=');
Readln (b);
If a/b>a div b then Write ('Ne delitsya') else Write ('Delitsya:',a/b:7:1);
Readln;
End.

@КонецСвета · 05.01.2012, 20:22

Сообщение от КиберПёс

If a/b>a div b

или

Pascal

1	if a mod b=0 then writeln('делится')

и т.д.

Выяснить, делится ли одно число на другое

Решение

Решение

@Григорьева 1 / 1 / 0 Регистрация: 05.01.2012 Сообщений: 10
		1
	Выяснить, делится ли одно число на другое 05.01.2012, 19:55. Показов 1317. Ответов 2 Метки нет (Все метки) Даны два натуральных числа a и b. Выяснить, делится ли а на b? помогите,плиз) 0

Опции темы