Дано натурально число. Определить произведение 2 и 3 цифры
Ответы на вопрос
Ответил danulpopov
0
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n =') div 10;
Writeln(n mod 10 * (n div 10 mod 10));
end.
Ответил AnonimusPro
0
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write('Введите число: ');
var a:=ReadInteger().ToString();
write('произведение 2 и 3 цифры: ',a[2].ToDigit()*a[3].ToDigit());
end.
//Версия 3.3, сборка 1611
begin
write('Введите число: ');
var a:=ReadInteger().ToString();
write('произведение 2 и 3 цифры: ',a[2].ToDigit()*a[3].ToDigit());
end.
Ответил mashaachernova
0
А можно понятней написать? Начиная с var, просто я так не могу понять что к чему. И что это такое a[2].ToDigit()*a[3].ToDigit()?
Ответил AnonimusPro
0
вводим натуральное число, преобразуем в строку, берем 2 и 3 символы из получившейся строки(это есть 2 и 3 цифры введенного числа) затем переводим эти символы в цифры и перемножаем
Ответил danulpopov
0
Проще говоря, разница в наших программах лишь в выборе стороны отсчета, я считал номера с права, он с лева. Вы не указали язык программирования - ваша проблема.
Новые вопросы