Вопрос школьника по предмету Информатика
Помогите написать прогу!
PASCAL
1)Пусть a=17, b=5. Найти div, mod и sgr(b)
2)Пусть a=48, b=6. Найти div, mod и sgr(а)
3)Пусть a=25, b=7. Найти div, mod,sgr(b) и sgrt (a)
Ответ учителя по предмету Информатика
var a,b:integer;
begin
a:=17; b:=5;
writeln(a div b,’ ‘,a mod b,’ ‘,sqr(b));
a:=48; b:=6;
writeln(a div b,’ ‘,a mod b,’ ‘,sqr(a));
a:=25; b:=7;
writeln(a div b,’ ‘,a mod b,’ ‘,sqr(b),’ ‘,sqrt(a));
end.
Результат:
3 2 25
8 0 2304
3 4 49 5
Похожие вопросы от пользователей
а) 4
б) 5
в) 6
г) 7
132*4:3