Сайт Солопова Н.А., учителя информатики и ИКТ
Человек, никогда не совершавший ошибок, никогда не пробовал ничего нового.
А. Эйнштейн

Задание №1.

На уроке ИЗО Петю заинтересовал вопрос: сколько квадратов может получиться из листа бумаги длиной А и шириной В? Петя отрезал от листа квадрат максимально возможного размера, затем повторил эту операцию с оставшимся фрагментом и продолжил так делать до тех пор, пока очередной фрагмент не оказался тоже квадратом. Угадайте, сколько квадратов получилось?

Решение на языке Pascal: Решение на языке Gambas: Решение на языке Python:

program z1_7klass2017;
var dlina, shirina, kol: integer;
begin
  writeln('Введите длину и ширину листа');
  readln(dlina, shirina);
  kol:=0;
  while (dlina > 0) and (shirina > 0) do begin
    if dlina > shirina then
      dlina:= dlina - shirina
    else shirina:= shirina - dlina;
    kol:=kol+1;
  end;
  writeln('Количество квадратов в листе ', kol);
end.

Public Sub Main()
Dim dlina1, shirina1, kol As Integer
kol = 0
Print "Введите длину листа"
Input dlina1
Print "Введите ширину листа"
Input shirina1
While shirina1 > 0 And dlina1 > 0
   If shirina1 > dlina1 Then
        shirina1 = shirina1 - dlina1
   Else
        dlina1 = dlina1 - shirina1
   Endif
kol = kol + 1
Wend
Print kol
End

kol = 0
print ("Введите длину листа")
dlina = int(input())
print ("Введите ширину листа")
shirina = int(input())
while dlina > 0 and shirina > 0:
    if dlina > shirina:
        dlina = dlina - shirina
    else:
        shirina = shirina - dlina
    kol = kol + 1
print("Кол-во квадратов в листе = ", kol )
Решение на языке Java: Решение на языке С++:  
package olimp7klass2017a;
import java.util.Scanner;
public class Olimp7Klass2017A {    
    public static void main(String[] args) {
        Scanner scanner = new Scanner(System.in);
        int dlina, shirina, k=0;
        System.out.println("Введите длину листа");
        dlina = scanner.nextInt();
        System.out.println("Введите ширину листа");
        shirina = scanner.nextInt();
        while(shirina > 0 && dlina >0){
            if(shirina > dlina){
                shirina = shirina - dlina;
            }else{
                dlina = dlina - shirina; }
            ++k; }
            System.out.println("Кол-во квадратов в листе = "+k); }    
}		 #include <iostream>
using namespace std;
int main(int argc, char *argv[])
{int dlina, shirina, kol;
    cout << "Введите длину листа" << endl;
    cin >> dlina;
    cout << "Введите ширину листа" << endl;
    cin >> shirina;
    while (dlina > 0 && shirina > 0) {
        if (dlina > shirina){
            dlina = dlina - shirina;} 
        else {shirina = shirina - dlina;}
         ++kol;}
    cout << kol;}