Проанализируйте текст программы на языке Паскаль и исправьте синтаксические ошибки Program algoritm1 ;
var x: interger;
begin
x:= 19 div 5 + sqrt (4);
writeln (x);
End.
Что будет выведено на экран в результате выполнения программы algoritm1?

import random

options=["rock", "scissors", "paper"]

player_choice=input("Choose one: rock, scissors or paper: ")

computer_choice=random.choice(options)

print("You choosed: "+player_choice)

print("Computer choosed: "+computer_choice)

if player_choice=="scissors":

   if computer_choice=="rock":

       print("You lose!")

   elif computer_choice=="paper":

       print("Congratulations! You won!")

   elif computer_choice=="scissors":

       print("Draw! Try again.")

if player_choice=="rock":

   if computer_choice=="rock":

       print("Draw! Try again.")

   elif computer_choice=="paper":

       print("You lose")

   elif computer_choice=="scissors":

       print("Congratulations! You won!")

if player_choice=="paper":

   if computer_choice=="rock":

       print("Congratulations! You won!")

   elif computer_choice=="paper":

       print("Draw! Try again.")

   elif computer_choice=="scissors":

       print("You lose!")    

Объяснение:

Можеш перекласти текст з англійської та переробити на свій смак. Вчителі теж можуть знайти цей сайт :)

// На складе было N ящиков мыла, в течение 10 дней со склада отпускали ежедневно K ящиков мыла. Сколько ящиков мыла осталось на складе?

var n,k: real;
begin 
   writeln('Введите количество ящиков мыла завезенных на склад');
  readln (n);
  writeln ('Укажите сколько ящиков мыла ежедневно отпускалось со склада');
  readln (k); 
  n:=n-(10*k);
  If (n<0) then writeln ('Вы ошиблись. На складе не было такого количества мыла')
          else writeln ('Через 10 дней на складе осталось ',n,' ящиков мыла');
end.