Предмет: Информатика,
автор: sakarimnazerke
Дано z и x. Найти y. Известно, что y = x*z/x. Например: если пишем 1 и 2 , то программа выводит 1.
Напишите программму пожалуйста
DarkTatarin:
Pascal: s: Integer; ReadLn(s);
Ответы
Автор ответа:
1
program test;
var z, x: Integer;
y: real;
begin
Readln(x, z);
y := x * z / x;
Writeln(y);
end.
Похожие вопросы
Предмет: Русский язык,
автор: раша6
Предмет: Окружающий мир,
автор: bavara89
Предмет: Английский язык,
автор: liliyagayduk
Предмет: Алгебра,
автор: annrur
Предмет: Математика,
автор: Lunnaya74