Предмет: Информатика,
автор: danilokristi
даны двузначное четырехзначное число. Найти произведение количества десятков двузначного числа и сотен четырехзначного числа.
Даны пятизначное число должно быть меньше 32000 и четырехзначное числа. Вычислить квадратный корень суммы сотен этих чисел.
Ответы
Автор ответа:
0
// PascalABC.Net
var
n2,n4,a,b:integer;
begin
Write('Введите натуральное двухзначное число: '); Read(n2);
Write('Введите натуральное четырехзначное число: '); Read(n4);
a:=n2 div 10; b:=(n4 mod 100) div 10;
Writeln(a*b)
end.
// PascalABC.Net
var
n5,n4,a,b:integer;
begin
Write('Введите натуральное пятизначное число: '); Read(n5);
Write('Введите натуральное четырехзначное число: '); Read(n4);
a:=(n5 mod 1000) div 100; b:=(n4 mod 1000) div 100;
Writeln(sqrt(a+b))
end.
var
n2,n4,a,b:integer;
begin
Write('Введите натуральное двухзначное число: '); Read(n2);
Write('Введите натуральное четырехзначное число: '); Read(n4);
a:=n2 div 10; b:=(n4 mod 100) div 10;
Writeln(a*b)
end.
// PascalABC.Net
var
n5,n4,a,b:integer;
begin
Write('Введите натуральное пятизначное число: '); Read(n5);
Write('Введите натуральное четырехзначное число: '); Read(n4);
a:=(n5 mod 1000) div 100; b:=(n4 mod 1000) div 100;
Writeln(sqrt(a+b))
end.
Автор ответа:
0
Большое спасибо!)
Автор ответа:
0
пожалуйста
Похожие вопросы
Предмет: Математика,
автор: jogangaj
Предмет: Английский язык,
автор: Nektozjk
Предмет: История,
автор: sdechks
Предмет: История,
автор: Nikitapacman