Составить программу, которая спрашивает: "Кто это, кошка или собака?". В зависимости от ответа ("К" или "С"), печатает на экране: "Мяу-мяу!" или "Гав-гав!".
помогите пожалуйста, очень прошу
Answers & Comments
xDmitryINFO
//Pascal var x:char; begin writeln('Кто это, кошка или собака?'); readln(x); if x = 'К' then writeln('Мяу-мяу!'); if x = 'C' then writeln('Гав-гав!'); end.
2 votes Thanks 3
GenusQ
// F# open System; [<EntryPoint>] let main argv = let rec getResult _ = let answer = Console.ReadKey(true); match answer.KeyChar with | 'К' | 'к' -> "Мяу-мяу!" | 'С' | 'с' -> "Гав-гав!" | _ -> (getResult null) printf "Это кошка или собака?\n" printf "%s" (getResult null) 0
Answers & Comments
var
x:char;
begin
writeln('Кто это, кошка или собака?');
readln(x);
if x = 'К' then
writeln('Мяу-мяу!');
if x = 'C' then
writeln('Гав-гав!');
end.
open System;
[<EntryPoint>]
let main argv =
let rec getResult _ =
let answer = Console.ReadKey(true);
match answer.KeyChar with
| 'К' | 'к' -> "Мяу-мяу!"
| 'С' | 'с' -> "Гав-гав!"
| _ -> (getResult null)
printf "Это кошка или собака?\n"
printf "%s" (getResult null)
0