Question

Составить программу, которая спрашивает: "Кто это, кошка или собака?". В зависимости от ответа ("К" или "С"), печатает на экране: "Мяу-мяу!" или "Гав-гав!".

помогите пожалуйста, очень прошу

Answer 1

//Pascal
var 
 x:char;
begin
 writeln('Кто это, кошка или собака?');
 readln(x);
 if x = 'К' then
  writeln('Мяу-мяу!');
 if x = 'C' then
  writeln('Гав-гав!');
end.

Answer 2

// 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