Задачи на алгоритмическом языке или любом языке программирования. 1. Найти частное двух чисел. (Подробное описание)
Answers & Comments
therealcf2014
Язык Pascal; program chastnoe; {Название программы} var a, b, ch: real; {Добавляем вещественные переменные a, b и ch} begin {Начало} read(a, b); {Вводим делимое и делитель через пробел}; ch:=a/b; {Присваиваем переменной ch значение частного от a и b} write(ch); {Выводим частное} end. {Конец}
0 votes Thanks 0
TaTaPmember
//На паскале var a,b:integer;//обозначаем целые переменные cp:real;//обозначаем вещественную переменную begin// начало write('Введите делимое ='); read(a);//Вводим переменную a или делимое write('Введите делитель ='); read(b);//Вводим переменную b или делитель cp:=a/b;// считаем частное writeln('Частность чисел ',a,'/',b,'=',cp);//выводим частное end.//конец
Answers & Comments
program chastnoe; {Название программы}
var a, b, ch: real; {Добавляем вещественные переменные a, b и ch}
begin {Начало}
read(a, b); {Вводим делимое и делитель через пробел};
ch:=a/b; {Присваиваем переменной ch значение частного от a и b}
write(ch); {Выводим частное}
end. {Конец}
var a,b:integer;//обозначаем целые переменные
cp:real;//обозначаем вещественную переменную
begin// начало
write('Введите делимое =');
read(a);//Вводим переменную a или делимое
write('Введите делитель =');
read(b);//Вводим переменную b или делитель
cp:=a/b;// считаем частное
writeln('Частность чисел ',a,'/',b,'=',cp);//выводим частное
end.//конец